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This publication contains specifications 
for the IBM System/360 Operating System 
Assembler Language (Levels E and F) . 



The assembler language is a "symbolic 
programming language used to write programs 
for the IBM System/360. The language pro- 
vides a convenient means for representing 
the machine instructions and related data 
necessary to program the IBM System/360. 
The IBM System/3 60 Operating System Assem- 
bler Program processes the language and 
provides auxiliary functions useful in the 
preparation and documentation of a program, 
and includes facilities for processing the 
assembler macro language. 

Part I of this publication describes the 
assembler language. 

Part II of this publication describes an 
extension of the assembler language — the 
macro language — used to define macro 
instructions. 







PREFACE 



This publication is a reference manual 
for the programmer using the assembler 
language and its features. 

Part I of this publication presents 
information common to all parts of the 
language followed by specific information 
concerning the symbolic machine instruction 
codes and the assembler program functions 
provided for the programmer's use. Part II 
contains a description of the macro lan- 
guage and procedures for its use. 

Appendixes A through J follow Part II. 
Appendixes A through F are associated with 
Parts I and II and present such items as a 
summary chart for constants, instruction 
listings, character set representations, 
and other aids to programming. Appendix G 
contains macro language summary charts, and 
Appendix H is a sample program. Appendix I 
is a features comparison chart of 
System/360 assemblers. Appendix J includes 
samples of macro definitions. 
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operations are discussed in the publication 
IBM System/360 Principles of Operation , 
Order No. GA22-6821. The IBM System/370 
machine operations are discussed in the 
publication IBM System/370 Principles of 
Operation , Order No. GA22-7000. Information 
on program assembling, linkage editing, 
executing, interpreting listings, and 
assembler programming considerations is 
provided in OS Assembler (F) Programmer's 
Guide , Order No. GC26-3756. 
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PART I — THE ASSEMBLER LANGUAGE 



SECTION 1: INTRODUCTION 



SECTION 2: GENERAL INFORMATION 



SECTION 3: ADDRESSING AND PROGRAM SECTIONING AND LINKING 



SECTION 4: MACHINE INSTRUCTIONS 



SECTION 5: ASSEMBLER INSTRUCTIONS 



SECTION 1: INTRODUCTION 



Computer programs may be expressed in 
machine language, i.e., language directly 
interpreted by the computer, or in a sym- 
bolic language, which is much more meaning- 
ful to the programmer. The symbolic lan- 
guage, however,, must be translated into 
machine language before the computer can 
execute the program. This function is 
accomplished by a processing program. 



Of the various symbolic programming lan- 
guages, assembler languages are closest to 
machine language in form and content. The 
assembler language discussed in this manual 
is a symbolic programming language for the 
IBM System/3 60. It enables the programmer 
to use all IBM System/360 machine func- 
tions, as if he were coding in System/360 
machine language. 



The assembler program that processes the 
language translates symbolic instructions 
into machine-language instructions, assigns 
storage locations,, and performs auxiliary 
functions necessary to produce an executa- 
ble machine-language program. 



THE ASSEMBLER LANGUAGE 



The basis of the assembler language is a 
collection of mnemonic symbols which rep- 
resent: 

1. System/360 machine-language operation 
codes . 

2. Operations (auxiliary functions) to be 
performed by the assembler program. 

The language is augmented by other sym- 
bols, supplied by the programmer, and used 
to represent storage addresses or data, 
Symbols are easier to remember and code 
than their ma chine- language equivalents. 
Use of symbols greatly reduces programming 
effort and error. 

The programmer may also create a type of 
instruction called a macro instruction. A 
mnemonic symbol, supplied by the program- 
mer, serves as the operation code of the 
instruction. 



Machine Operation Codes 



Compatibility 



System/360 Operating System assemblers 
process source programs written in the 
Basic Programming Support/360 basic assem- 
bler language, the IBM 7090/7094 Support 
Package for IBM System/360 assembler lan- 
guage, the Basic Programming Support Ass- 
embler (8K Tape) language, the Basic Oper- 
ating System Assembler (8K Disk) language, 
and the Disk and Tape Systems Assembler 
language, with the following exceptions : 



1. The XFR assembler instruction is con- 
sidered an invalid mnemonic operation 
code by Operating System/360 assem- 
blers. 



The assembler language provides mnemonic 
machine-instruction operation codes for all 
machine instructions in the IBM System/360 
Universal Instruction Set and extended mne- 
monic operation codes for the conditional 
branch instruction. 



Assembler Operation Codes 



The assembler language also contains 
mnemonic assembler-instruction operation 
codes, used to specify auxiliary functions 
to be performed by the assembler. These 
are instructions to the assembler program 
itself and, with a few exceptions, result 
in the generation of no machine- language 
code by the assembler program. 



2. The assignment, size, and ordering of 
literal pools may differ among the 
assemblers. 



Macro Instructions 



Differences in the macro language for 
System/360 assemblers are described in Sec- 
tion 10 of this publication. 



The assembler language enables the pro- 
grammer to define and use macro 
instructions. 



Section 1: Introduction 



Macro instructions are represented by an 
operation code which stands for a sequence 
of machine and/ or assembler instructions. 
Macro instructions used in preparing an 
assembler language source program fall into 
two categories: system macro instructions, 
provided by IBM, which relate the object 
program to components of the operating 
system; and macro instructions created by 
the programmer specifically for use in the 
program at hand, or for incorporation in a 
library, available for future use. 

Programmer- created macro instructions 
are used to simplify the writing of a 
program and to ensure that a standard 
sequence of instructions is used to 
accomplish a desired function. For 
instance, the logic of a program may 
require the same instruction sequence to be 
executed again and again. Rather than code 
this entire sequence each time it is need- 
ed,, the programmer creates a macro 
instruction to represent the sequence and 
then, each time the sequence is needed, the 
programmer simply codes the macro 
instruction statement. During assembly, 
the sequence of instructions represented by 
the macro instruction is inserted in the 
object program. 

Part II of this publication discusses 
the language and procedures for defining 
and using macro instructions. 



THE ASSEMBLER PROGRAM 



The assembler program, also referred to 
as the "assembler," processes the source 
statements written in the assembler 
language. 



The amount of main storage allocated to 
the assembler for use during processing 
determines the maximum number of certain 
language elements that may be present in 
the source program. 



PROGRAMMER AIDS 



The assembler provides auxiliary func- 
tions that assist the programmer in check- 
ing and documenting programs, in controll- 
ing address assignment,, in segmenting a 
program, in data and symbol definition, in 
generating macro instructions, and in con- 
trolling the assembler itself. Mnemonic 
operation codes for these functions are 
provided in the language. 



Variety in Data Representation; Decimal, 
binary, hexadecimal, or character represen- 
tation of machine- language binary values 
may be employed by the programmer in writ- 
ing source statements. The programmer se- 
lects the representation best suited to his 
purpose. 



Base Register Address Calculation; As dis- 
cussed in IBM System/360; Principles of 
Operation , the System/ 3 60 addressing scheme 
requires the designation of a base register 
(containing a base address value) and a 
displacement value in specifying a storage 
location. The assembler assumes the cleri- 
cal burden of calculating storage addresses 
in these terms for the symbolic addresses 
used by the programmer. The programmer 
retains control of base register usage and 
the values entered therein. 



Basic Functions 



Processing involves the translation of 
source statements into machine language, 
the assignment of storage locations to 
instructions and other elements of the 
program, and the performance of the auxil- 
iary assembler functions designated by the 
programmer. The output of the assembler 
program is the object program, a machine- 
language translation of the source program. 
The assembler furnishes a printed listing 
of the source statements and object program 
statements and additional information 
useful to the programmer in analyzing his 
program,, such as error indications. The 
object program is in the format required by 
the linkage editor component of Operating 
System/360. (See the linkage editor publi- 
cation.) 



Relocat ability ; The object programs pro- 
duced by the assembler are in a format 
enabling relocation from the originally 
assigned storage area to any other suitable 
area . 



Sectioning and Linking; The assembler lan- 
guage and program provide facilities for 
partitioning an assembly into one or more 
parts called control sections. Control 
sections may be added or deleted when 
loading the object program. Because con- 
trol sections do not have to be loaded 
contiguously in storage, a sectioned pro- 
gram may be loaded and executed even though 
a continuous block of storage large enough 
to accommodate the entire program may not 
be available. 

The assembler allows symbols to be 
defined in one assembly and referred to in 
another, thus effecting a link between 



separately assembled programs. This per- OPERATING SYSTEM RELATIONSHIPS 
mits reference to data and transfer of 
control between programs. A discussion of 

sectioning and linking is contained in The assembler is a component of the IBM 
Section 3 under the heading, "Program Sec- System/360 Operating System and, as such, 
tioning and Linking." functions under control of the operating 

system. The operating system provides the 
assembler with input/output, library, and 
other services needed in assembling a 
source program. In a like manner, the 
object program produced by the assembler 
will normally operate under control of the 
operating system and depend on it for 
input/output and other services. In writ- 
ing the source program, the programmer must 
include statements requesting the desired 
functions from the operating system. These 
statements are discussed in the control 
program services publication. The 
OS Introduction publication provides further 
information on operating system relationships 
Input/output considerations are discussed in 
the data management publication. 



Program Listings: A listing of the source 
program statements and the resulting object 
program statements may be produced by the 
assembler for each source program it assem- 
bles. The programmer can partly control 
the form and content of the listing. 



Error Indications; As a source program is 
assembled, it is analyzed for actual or 
potential errors in the use of the assem- 
bler language. Detected errors are indi- 
cated in the program listing. 



Section 1 : Introduction 



SECTION 2: GENERAL INFORMATION 



This section presents information about 
assembler language coding conventions and 
assembler source statement structure 
addressing. 



ASSEMBLER LANGUAGE CODING CONVENTIONS 



is not part of a statement and is discussed 
following the subsection "Statement 
Format." 

The entries (i.e. , coding) composing a 
statement occupy columns 1-71 of a line 
and, if needed, columns 16-71 of one or two 
successive continuation lines. 



This subsection discusses the general 
coding conventions associated with use of 
the assembler language. 

Coding Form 

A source program is a sequence of source 
statements that are punched into cards. The 
standard card form, IBM 6509 (shown in Figure 
2-2) , can be used for punching source state- 
ments. These statements may be written on 
the standard coding form, GX28-6509 (shown 
in Figure 2-1) , provided by IBM. One line 
of coding on the form is punched into one 
card. The vertical columns on the form 
correspond to card columns. Space is provided 
on the form for program identification and 
instructions to keypunch operators. 



The body of the form (Figure 2-1) is 
composed of two fields: the statement 
field, columns 1-71, and the 
identification-sequence field, columns 
73-80. The identification-sequence field 



Continuation Lines 

When it is necessary to continue a 
statement on another line, the following 
rules apply. 

1. Write the statement up through column 71. 

2. Enter a continuation character (not blank 
and not part of the coding) in column 72 
of the line. 

3. Continue the statement in column 16 of the 
next line, leaving columns 1 through 15 
blank. 

4. If" the statement is not finished before 
column 71 of the second line, enter a 
continuation character in column 72, and 
continue in column 16 of the following line. 

5. The statement has to be finished before 
column 71 of the third line, because the 
maximum number of continuation lines is two. 

6. Macro instruction can be coded on as many 
lines as are needed. 



These rules assume that normal source 
statement boundaries are used (see "State- 
ment Boundaries" below) . 
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Figure 2-1. Coding Form 



Section 2 : General Information 



Statement Boundaries 

Source statements are normally contained 
in columns 1-71 of statement lines and 
columns 16-71 of any continuation lines. 
Therefore, columns 1, 71, and 16 are 
referred to as the "begin," "end," and 
"continue" columns, respectively. (This 
convention can be altered by use of the 
Input Format Control (ICTL) assembler 
instruction discussed later in this publi- 
cation. The continuation character, if 
used, always immediately follows the "end" 
column. 



Statement Format 

Statements may consist of one to four 
entries in the statement field. They are, 
from left to right: a name entry, an 
operation entry, an operand entry, and a 
comments entry. These entries must be 
separated by one or more blanks, and must 
be written in the order stated. 

The coding form (Figure 2-1) is ruled to 
provide an 8-character name field, a 
5-character operation field, and a 
56-character operand and/or comments field. 

If desired, the programmer can disregard 
these boundaries and write the name, 
operation, operand, and comment entries in 
other positions, subject to the following 
rules : 

1. The entries must not extend beyond 
statement boundaries within a line 
(either the conventional boundaries 
if no ICTL statement is given, or as 
designated by the programmer via the 
ICTL instruction) . 

2. The entries must be in proper 
sequence, as stated previously. 

3. The entries must be separated by one 
or more blanks. 

4. If used, a name entry must be written 
starting in the begin column. 



5. The name and operation entries must be 
completed in the first line of the 
statement, including at least one 
blank following the operation entry. 

A description of the name, operation, 
operand, and comments entries follows: 

Name Entry: The name entry is a symbol 
created by the programmer to identify a 
statement. A name entry is usually option- 
al. The symbol must consist of eight 
characters or less, and be entered with the 
first character appearing in the begin 
column. The first character must be 
alphabetic. If the begin column is blank, 
the assembler program assumes no name has 
been entered. No blanks can appear in 
the symbol . 

Operation Entry : The operation entry is 
the mnemonic operation code specifying the 
machine operation, assembler, or macro- 
instruction operation desired. An 
operation entry is mandatory and cannot 
appear in a continuation line. It must 
start at least one position to the right of 
the begin column. Valid mnemonic operation 
codes for machine and assembler operations 
are contained in Appendixes D and E of this 
publication. Valid operation codes consist 
of five characters or fewer for machine or 
assembler-instruction operation codes, and 
eight characters or fewer for macro- 
instruction operation codes. No blanks can 
appear within the operation entry. 

Operand Entries : Operand entries identify 
and describe data to be acted upon by the 
instruction, by indicating such things as 
storage locations, masks, storage-area 
lengths, or types of data. 

Depending on the needs of the instruc- 
tion, one or more or no operands can be 
written. Operands are required for all 
machine instructions, but many assembler 
instructions require no operand. 

Operands must be separated by commas , 
and no blanks can intervene between oper- 
ands and the commas that separate them. 



1___L 



00000000 

1111)111 

22222222 
33333333 
44444444 
5555555b 
86666566 
7 7 7 7 7 7 7 7 
88888888 
99999999 



00000 
11111 
22222 
33333 
44444 
55555 
66668 
77777 
88888 
99999 



00000 
11111 
22222 
33333 
44444 
55555 
66666 
77777 
88888 
99999 



1111 
2222 
3333 



00000 
11111 
22222 
33333 



OOOGIOOO 



11111 
22222 
33333 



1111 
22222 
33333 



G0OO0 
11111 
22222 
33333 



1000 
Mil 
'222 
1333 



IBM SYSTEM/360 

STANDARD ASSEMBLER CARD 



6666 
7777 
8888 
9999 



66666 
77777 
88888 
99999 



66666 
7 7 7 7 7 
88888 
S9999 



6666E 
77777 



66666 
7 7 7 7 7 



666 
777 

888 
99999S9999S9993 



00000 
11111 
22222 
33333 
44444 
55555 
66866 
77777 
86888 
99999 



00000 
11111 
22222 
33333 
44444 
55555 
66666 
77777 
88888 
9 999 9 



000000 
111111 
2 2 2-222 
333333 
444444 
555555 
666666 
777777 
8 8 8 8 8 8 
999999 



008001)00 
11111111 
22222222 
3333333 
44444444 
55555555 
66666666 

7 7777777 

8 8888888 
99999999 



Figure 2-2. Punched Card Form 



The first blank normally indicates the end 
of the operand field. 

The operands cannot contain embedded 
blanks , except as follows : 

If character representation is 
used to specify a constant, a 
literal, or immediate data in an 
operand, the character string can 
contain blanks, e.g., C'A D*. 



compared. The comment entry reminds the 
programmer that he is comparing "new sum" 
to "old" with this instruction. 



r r t t 

| Name | Operation | Operand | 

|. + x H 

JCOMP |CR | 5,6 NEW SOM TO OLD | 
L X X J 



Comment Entries : Comments are descriptive 
items of information about the program that 
are shown on the program listing. All 256 
valid characters (see Character Set in this 
section) , including blanks can be used in 
writing a comment. The entry can follow 
the operand entry and must be separated 
from it by a blank; each line of comment 
entries cannot extend beyond the end 
column (column 71) . 



An entire statement field can be used 
for a comment by placing an asterisk in the 
begin column. Extensive comment entries 
can be written by using a series of lines 
with an asterisk in the begin column of 
each line or by using continuation lines. 
Comment entries cannot fall between a 
statement and its continuation line. 

In statements where an optional operand 
entry is omitted but a comment entry is 
desired, the absence of the operand entry 
must be indicated by a comma preceded and 
followed by one or more blanks , as follows : 

r t t ~i 

| Name | Operation | Operand | 

j. x __x ., 

| | END | COMMENT | 

L X X . J 

For instructions that cannot contain an 
operand entry, this comma is not needed. 

Note : Macro prototype statements without 
operands will not tolerate comments, even 
if a comma is coded as shown above. 

For information on rules for the operand 
field of different assembler instructions, 
refer to the table in Appendix E. 

Statement Example: The following example 
illustrates the use of name, operation, 
operand, and comment entries. A compare 
instruction has been named by the symbol 
COMP; the operation entry (CR) is the 
mnemonic operation code for a register-to- 
register compare operation, and the two 
operands (5,6) designate the two general 
registers whose contents are to be 



Identification-Sequence Field 



The identification-sequence field of the 
coding form (columns 73-80) is used to 
enter program identification and/or state- 
ment sequence characters. The entry is 
optional. If the field, or a portion of 
it, is used for program identification, the' 
identification is punched in the source 
cards and reproduced in the printed listing 
of the source program. 



To aid in keeping source statements in 
order, the programmer can number the cards 
in this field. These characters are 
punched into their respective cards, and 
during assembly the programmer may request 
the assembler to verify this sequence by 
use of the Input Sequence Checking (ISEQ) 
assembler instruction. This instruction is 
discussed in Section 5, under Program 
Control Instructions. 



Summary of Statement Format 



The entries in a statement must always 
be separated by at least one blank and must 
be in the following order: name, operation, 
operand(s), comment (s) . 



Every statement requires an operation 
entry. Name and comment entries are 
optional. Operand entries are required for 
all machine instructions and most assembler 
instructions . 



The name and operation entries must be 
completed in the first statement line, 
including at least one blank following the 
operation entry. 

The name and operation entries must not 
contain blanks. Operand entries must not 
have blanks preceding or following the 
commas that separate them. 
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A name entry must always start in the 
begin column. 

If the column after the end column is 
blank, the next line must start a new 
statement. If the column after the end 
column is not blank, the following line 
is treated as a continuation line. 

All entries must be contained within the 
designated begin, end, and continue column 
boundaries. 



Character Set 



Source statements are written using the 
following characters: 



Letters A through Z f and $, #, a 



Digits 



through 9 



Special 
Characters + - 



( ) 



/ g blank 



These characters are represented by the 
card-punch combinations and internal bit 
configurations listed in Appendix A. In 
addition, any of the 256 punch combinations 
may be designated anywhere that characters 
may appear between paired apostrophes, in 
comments, and in macro instruction oper- 
ands . 



An operand entry is: 

• One or more operands composed of one or 
more expressions, which, in turn, are 
composed of a term or an arithmetic 
combination of terms. 

Operands of machine instructions 
generally represent such things as storage 
locations, general registers, immediate 
data, or constant values. Operands of 
assembler instructions provide the informa- 
tion needed by the assembler program to 
perform the designated operation. 

Figure 2-3 depicts this structure. 
Terms shown in Figure 2-3 are classed as 
absolute or relocatable. Terms are abso- 
lute or relocatable, depending on the 
effect of program relocation upon them. 
Program relocation is the loading of the 
object program into storage locations other 
than those originally assigned by the 
assembler. A term is absolute if its value 
does not change upon relocation. A term is 
relocatable if its value changes upon relo- 
cation. 



The following subsection "Terms and 
Expressions" discusses these items as out- 
lined in Figure 2-3. 



TERMS AND EXPRESSIONS 



TERMS 



ASSEMBLER LANGUAGE STRUCTURE 

The basic structure of the language can 
be stated as follows. 

A source statement is composed of: 

• A name entry (usually optional) . 

• An operation entry (required). 

• An operand entry (usually required) . 

• Comments entry (optional) . 
A name entry is: 

• A symbol. 

An operation entry is: 

• A mnemonic operation code representing 
a machine, assembler, or macro- 
instruction. 



Every term represents a value. This 
value may be assigned by the assembler 
(symbols, symbol length attribute, location 
counter reference) or may be inherent in 
the term itself (self -defining term, 
literal) . 

An arithmetic combination of terms is 
reduced to a single value by the assembler. 

The following material discusses each 
type of term and the rules for its use. 



Symbols 

A symbol is a character or combination of 
characters used to represent locations or 
arbitrary values. Symbols, through their 
use in name fields and in operands, provide 
the programmer with an efficient way to 
name and reference a program element. 
There are three types of symbols : 

1. Ordinary symbols. 

2. Variable symbols. 

3. Sequence symbols. 
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Ordinary symbols , created by the pro- 
grammer for use as a name entry and/or an 
operand, must conform to these rules: 

1. The symbol must not consist of more 
than eight characters. The first 
character must be a letter. The other 



characters may be letters, digits, or 
a combination of the two. 

2. No special characters may be included 
in a symbol. 

3. No blanks are allowed in a symbol. 
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Name Entry 



Is a Symbol 
which is an 



Machine 
Instruction 



Ordinary 
Symbol 
(AT or RT) 



VariabU 
Symbol 



Sequence 
Symbol 



A Symbol 
e.g., BETA 
(AT or RT) 



2 



Operation Entry 



Is a Mnemonic 
Operation Code 



Assembler 
Instruction 



Ter 



Macro 
Instruction 



which may be 
any one of 
the following 



A Self- 
defining 
Term (AT) 



A Location 
Counter Refer- 
ence i.e.,* 
(RT) 



Exp 



Operand Entry 



One or more 
Operands that 
are composed 
of an 



Exp (Exp) 



Exp (Exp, Exp) 



Exp - Expression 



Arithmetic 
Combination 
of Terms 



A Literal 

e.g.^F'1259' 

(RT) 



Symbol Length 
Attribute Refer- 
ence e.g., 
L 'Symbol (AT) 



Other Symbol. 
Attribute 
References (AT) 



Decimal 
e.g., 15 



which may be 
any one of 
the following 



Hexadecimal 
e.g.^X'Ct 1 



Binary 
e.g.,B'10r 



Character 
e.g.,C'AB9' 



AT = Absolute Term 
RT= Relocatable Term 



May be generated by combination of variable symbols and assembler language characters. (Conditional assembly only) 



Conditional assembly only. 

Figure 2-3. Assembler Language Structure — Machine and Assembler Instructions 
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In the following sections, the term 
symbol refers to ordinary symbol. 

The following are valid symbols: 



READER 


L00P2 


3B4 


A23456 


N 


$A1 


X4F2 


SH 


#56 



The following symbols are invalid, for 
the reasons noted: 

256B (first character is not 

alphabetic) 
REC0RDAREA2 (more than eight characters) 
BCD* 3 4 (contains a special character 

" *> 
IN AREA (contains a blank) 

Variable symbols must begin with an 
ampersand (&) followed by one to seven 
letters and/or numbers, the first of which 
must be a letter. Variable symbols are 
used within the source program or macro 
definition to allow different values to be 
assigned to one symbol. A complete dis- 
cussion of variable symbols appears in 
Section 6 . 

Sequence symbols consist of a period (.) 
followed by one to seven letters and/or 
numbers, the first of which must be a let- 
ter. Sequence symbols are used to indicate 
the position of statements within the 
source program or macro definition . Through 
their use the programmer can vary the 
sequence in which statements are processed 
by the assembler program. (See the complete 
discussion in Section 6 . ) 

NOTE: Sequence symbols and variable symbols 
are used only for the macro language and 
conditional assembly. Programmers who do 
not use these features need not be concerned 
with these symbols . 



DEFINING SYMBOLS : The assembler assigns a 
value to each symbol appearing as a name 
entry in a source statement. The values 
assigned to symbols naming storage areas, 
instructions, constants, and control sec- 
tions are the addresses of the leftmost 
bytes of the storage fields containing the 
named items. Since the addresses of these 
items may change upon program relocation, 
the symbols naming thern are considered 
relocatable terms. 



The value of a symbol may not be nega- 
tive and may not exceed 2 2 *-l. 

A symbol is said to be defined when it 
appears as the name of a source statement. 
(A special case of symbol definition is 
discussed in Section 3„ under "Program 
Sectioning and Linking.") 

Symbol definition also involves the 
assignment of a length attribute to the 
symbol. (The assembler maintains an inter- 
nal table - the symbol table - in which the 
values and attributes of symbols are kept. 
When the assembler encounters a symbol in 
an operand, it refers to the table for the 
values associated with the symbol.) The 
length attribute of a symbol is the length, 
in bytes,, of the storage field whose 
address is represented by the symbol. For 
example, a symbol naming an instruction 
that occupies four bytes of storage has a 
length attribute of 1. Note that there are 
exceptions to this rule; for example, in 
the case where a symbol has been defined by 
an equate to location counter value (EQU *) 
or to a self-defining term, the length 
attribute of the symbol is 1. These and 
other exceptions are noted under the 
instructions involved. The length attri- 
bute is never affected by a duplication 
factor. 

PREVIOUSLY DEFINED SYMBOLS: Some instruc- 
tions require that a symbol appearing in 
the operand entry be previously defined. 
This simply means that the symbol, before 
its use in an operand, must have appeared 
as a name entry in a prior statement . 

GENERAL RESTRICTIONS ON SYMBOLS: A symbol 
may be defined only once in an assembly. 
That is, each symbol used as the name of a 
statement must be unique within that assem- 
bly. However, a symbol may be used in the 
name field more than once as a control 
section name (i.e., defined in the START, 
CSECT,, or DSECT assembler statements des- 
cribed in Section 3) because the coding of 
a control section may be suspended and then 
resumed at any subsequent point. The CSECT 
or DSECT statement that resumes the section 
must be named by the same symbol that 
initially named the section; thus, the 
symbol that names the section must be 
repeated. Such usage is not considered to 
be duplication, of a symbol definition. 



A symbol used as a name entry in the 
Equate Symbol (EQU) assembler instruction 
is assigned the value designated in the 
operand entry of the instruction. Since 
the operand entry may represent a relocata- 
ble value or an absolute (i.e., 
nonchanging) value, the symbol is consid- 
ered a relocatable term or an absolute 
term, depending upon the value it is equat- 
ed to. 



Self-Defining Terms 

A self-defining term is one whose value 
is inherent in the term. It is not 
assigned a value by the assembler. For 
example, the decimal self-defining term - 
15 - represents a value of 15. The length 
attribute of a self-defining term is always 
1. 
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There are four types of self-defining 
terms: decimal, hexadecimal, binary, and 
character. Use of these terms is spoken of 
as decimal, hexadecimal, binary, or charac- 
ter representation of the ma chine- language 
binary value or bit configuration they 
represent. 

Self-defining terms are classed as abso- 
lute terms, since the values they represent 
do not change upon program relocation. 

USING SELF-DEFINING TERMS: Self-defining 
terms are the means of specifying machine 
values or bit configurations without equat- 
ing the values to symbols and using the 
symbols. 

Self-defining terms may be used to spec- 
ify such program elements as immediate 
data, masks, registers, addresses, and 
address increments. The type of term se- 
lected (decimal, hexadecimal, binary, or 
character) will depend on what is being 
specified. 

The use of a self-defining term is quite 
distinct from the use of data constants or 
literals. When a self -defining term is 
used in a ma chine -instruction statement, 
its value is assembled into the instruc- 
tion. When a data constant is referred to 
or a literal is specified in the operand of 
an instruction, its address is assembled 
into the instruction. Self -defining terms 
are always right- justified; truncation or 
padding with zeros if necessary occurs on 
the left. 



Decimal Self -Defining Term: 



decimal 



self-defining term is simply an unsigned 
decimal number written as a sequence of 
decimal digits. High-order zeros may be 
used (e.g., 007). Limitations on the value 
of the term depend on its use. For exam- 
ple, a decimal term that designates a 
general register should have a value 
between and 15; one that represents an 
address should not exceed the size of 
storage. In any case, a decimal term may 
not consist of more than eight digits, or 
exceed 16,777,215 (2 2 *-l). A decimal self- 
defining term is assembled as its binary 
equivalent. Some examples of decimal self- 
defining terms are: 8, 147, 4092, and 
00021. 



eight-bit mask would consist of- two hexa- 
decimal digits. The maximum value of a 
hexadecimal term is X'FFFFFF'. 

The hexadecimal digits and their bit 
patterns are as follows: 

0- 0000 4- 0100 8- 1000 C- 1100 

1- 0001 5- 0101 9- 1001 D- 1101 

2- 0010 6- 0110 A- 1010 E- 1110 

3- 0011 7- 0111 B- 1011 F- 1111 

A table for converting from hexadecimal 
representation to decimal representation is 
provided in Appendix B. 



Binary Self-Defining Term: A binary self- 
defining term is written as an unsigned 
sequence of Is and 0s enclosed in 
apostrophes and preceded by the letter B, 
as follows: B'lOOOllOl'. This term would 
appear in storage as shown, occupying one 
byte. A binary term may have up to 24 bits 
represented. 

Binary representation is used primarily 
in designating bit patterns of masks or in 
logical operations. 

The following example illustrates a 
binary term used as a mask in a Test Under 
Mask (TM) instruction. The contents of 
GAMMA are to be tested, bit by bit, against 
the pattern of bits represented by the 
binary term. 

r t t 1 

| Name | Operation | Operand | 

y + + ^ 

j ALPHA JTM j GAMMA, B' 10101101' j 
t j j j 



Character Self -Defining Term: A character 
self-defining term consists of one to three 
characters enclosed by apostrophes. It 
must be preceded by the letter C. All 
letters, decimal digits, and special char- 
acters may be used in a character term. In 
addition,, any of the remainder of the 256 
punch combinations may be designated in a 
character self -defining term. Examples of 
character self-defining terms are as fol- 
lows : 



CV 

C'ABC 



C • (blank) 
C'13' 



Hexadecimal Self -defining Term: A hexa- 
decimal self-defining term consists of one 
to six hexadecimal digits enclosed by 
apostrophes and preceded by the letter X: 
X , C49'. 



Each hexadecimal digit is assembled as 
its four-bit binary equivalent. Thus, a 
hexadecimal term used to represent an 



Because of the use of apostrophes in the 
assembler language and ampersands in the 
macro language as syntactic characters, the 
following rule must be observed when using 
these characters in a character term. 

For each apostrophe or ampersand desired 
in a character self-defining term, two 
apostrophes or ampersands must be written. 
For example, the character value A'# would 
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be written as 'A" '#• , while an apostrophe 
followed by a blank and another single 
apostrophe would be written as •*' '• '. 

Each character in the character sequence 
is assembled as its eight-bit code equiva- 
lent (see Appendix A) . The two apostrophes 
or ampersands that must be used to rep- 
resent an apostrophe or ampersand within 
the character sequence are assembled as an 
apostrophe or ampersand. 



Location Counter Reference 



The Location counter: A location counter 
is used to assign storage addresses to 
program statements. It is the assembler's 
equivalent of the instruction counter in 
the computer. As each machine instruction 
or data area is assembled, the location 
counter is first adjusted to the proper 
boundary for the item, if adjustment is 
necessary, and then incremented by the 
length of the assembled item. Thus, it 
always points to the next available loca- 
tion. If the statement is named by a 
symbol, the value attribute of the symbol 
is the value of the location counter after 
boundary adjustment, but before addition of 
the length. 



The assembler maintains a location 
counter for each control section of the 
program and manipulates each location 
counter as previously described. Source 
statements for each .section are assigned 
addresses from the location counter for 
that Section. The location counter for 
each successively declared control section 
assigns locations in consecutively higher 
areas of storage. Thus, if a program has 
multiple control sections, all statements 
identified as belonging to the first con- 
trol section will be assigned from the 
location counter for section 1, the state- 
ments for the second control section will 
be assigned from the location counter for 
section 2, etc. This procedure is followed 
whether the statements from different con- 
trol sections are interspersed or written 
in control section sequence. 

The location counter setting can be 
controlled by using the START and ORG 
assembler instructions, which are described 
in Sections 3 and 5. The counter affected 
by either of these assembler instructions 
is the counter for the control section in 
which they appear. The maximum value for 
the location counter is 2 2 **-l. 

The programmer may refer to the current 
value of the location counter at any place 
in a program by using an asterisk as a term 



in an operand. The asterisk represents the 
location of the first byte of currently 
available storage (i.e., after any required 
boundary adjustment) . Using an asterisk as 
the operand in a machine- instruction state- 
ment is the same as placing a symbol in the 
name field of the statement and then using 
that symbol as an operand of the statement. 
Because a location counter is maintained 
for each control section, a location count- 
er reference designates the location count- 
er for the section in which the reference 
appears. 

A reference to the location counter may 
be made in a literal address constant 
(i.e., the asterisk may be used in an 
address constant specified in literal 
form) . The address of the instruction 
containing the literal is used for the 
value of the location counter. A location 
counter reference may not be used in a 
statement which requires the use of a 
predefined symbol, with the exception of 
the EQU and ORG assembler instructions. 



Literals 



A literal term is one of three basic 
ways to introduce data into a program. It 
is simply a constant preceded by an equal 
sign (=) . 

A literal represents data rather than a 
reference to data. The appearance of a 
literal in a statement directs the assem- 
bler program to assemble the data specified 
by the literal, store this data in a 
"literal pool," and place the address of 
the storage field containing the data in 
the operand field of the assembled state- 
ment . 

Literals provide a means of entering 
constants (such as numbers for calculation, 
addresses, indexing factors, or words or 
phrases for printing out a message) into a 
program by specifying the constant in the 
operand of the instruction in which it is 
used. This is in contrast to using the DC 
assembler instruction to enter the data 
into the program and then using the name of 
the DC instruction in the operand. Only 
one literal is allowed in a machine- 
instruction statement. 

A literal term cannot be combined with 
any other terms. 

A literal cannot be used as the receiv- 
ing field of an instruction that modifies 
storage. 

A literal cannot be specified in a shift 
instruction or an I/O instruction (HIO, HDV, 
TIO, SIO, SIOF) . 
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When a literal is contained in an in- 
struction, it cannot specify an explicit 
base register or an explicit index register. 

A literal cannot be specified in an ad- 
dress constant (see Section 5/ DC — Define 
Constant) . 

The instruction coded below shows one 
use of a literal. 

r T T -, 

j Name | Operation | Operand I 

j. x x -I 

|GAMMA |L 1 10, =F' 27V | 

l x — x J 

The statement GAMMA is a load instruc- 
tion using a literal as the second operand. 
When assembled, the second operand of the 
instruction will be the address at which 
the value F'274' is stored. 

NOTE: If a literal operand is a self- 
defining term (X,C,B, or decimal) and the 
equal sign (=) is omitted, the statement 
may assemble without error (See "Using 
Self -Defining Terms"). 

In general, literals can be used wherev- 
er a storage address is permitted as an op- 
erand. They cannot, however, be used in 
any assembler instruction that requires the 
use of a previously defined symbol. Liter- 
als are considered relocatable, because the 
address of the literal, rather than the 
literal itself, will be assembled in the 
statement that employs a literal. The 
assembler generates the literals, collects 
them, and places them in a specific area of 
storage, as explained in the subsection 
"The Literal Pool." A literal is not to be 
confused with the immediate data in an SI 
instruction. Immediate data is assembled 
into the instruction. 

Literal Format: The assembler requires a 
description of the type of literal being 
specified as well as the literal itself. 
This descriptive information assists the 
assembler in assembling the literal cor- 
rectly. The descriptive portion of the 
literal must indicate the format of the 
constant. It may also specify the length 
of the constant. 

The method of describing and specifying 
a constant as a literal is nearly identical 
to the method of specifying it in the 
operand of a DC assembler instruction. The 
major difference is that the literal must 
start with an equal sign (=) , which indi- 
cates to the assembler that a literal 
follows. The reader is referred to the 
discussion of the DC assembler instruction 
operand format (Section 5) for the means of 
specifying a literal. The type of literal 
designated in an instruction is not checked 
for correspondence with the operation code 
of the instruction. 



Some examples of literals are: 



=A(BETA) 
=F'123lf 

=C ' ABC ' 



address constant literal. 
a fixed-point number with 
a length of four bytes. 
a character literal. 



The Literal Pool: The literals processed 
by the assembler are collected and placed 
in a special area called the literal pool, 
and the location of the literal,, rather 
than the literal itself, is assembled in 
the statement employing a literal. The 
positioning of the literal pool may be 
controlled by the programmer, if he so 
desires. Unless otherwise specified, the 
literal pool is placed at the end of the 
first control section. 

The programmer may also specify that 
multiple literal pools be created. Howev- 
er, the sequence in which literals are 
ordered within the pool is controlled by 
the assembler. Further information on 
positioning the literal pool(s) is in Sec- 
tion 5 under "LTORG — Begin Literal Pool." 



Symbol Length Attribute Reference 

The length attribute of a symbol may be 
used as a term. Reference to the attribute 
is made by coding L' followed by the 
symbol, as in: 

L'BETA 

The length attribute of BETA will be 
substituted for the term. The use of the 
length attribute of a symbol defined with 
a DC or DS with explicit length given by 
an expression is invalid. The following 
example illustrates the use of L' symbol 
in moving a character constant into either 
the high-order or low-order end of a 
storage field. 

For ease in following the example, the 
length attributes of Al and B2 are men- 
tioned. However, keep in mind that the 
L' symbol term makes coding such as this 
possible in situations where lengths are 
unknown. 



r t t 

| Name | Operation | Operand 



I- + — 

| Al j DS 
|B2 | DC 
j HIORD | MVC 
j LOORD j MVC 
L X 



H 



|CL8 | 

|CL2'AB' | 

|A1(L" B2),B2 | 

|A1+L'A1-L , B2(L , B2) , B2 j 

-X J 



Al names a storage field eight bytes in 
length and is assigned a length attribute 
of 8. B2 names a character constant two 
bytes in length and is assigned a length 
attribute of 2. The statement named HIORD 
moves the contents of B2 into the leftmost 
two bytes of Al. The term L'B2 in par en- 
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theses provides the length specification 
required by the instruction. When the 
instruction is assembled, the length is 
placed in the proper field of the machine 
instruction. 

The statement named LOORD moves the 
contents of B2 into the rightmost two bytes 
of Al. The combination of terms 
A1+L*A1-L'B2 results in the addition of the 
lenqth of Al to the beginning address of 
Al, and the subtraction of the length of B2 
from this value. The result is the address 
of the seventh byte in field Al. The 
constant represented by B2 is moved into Al 
starting at this address. L'B2 in 
parentheses provides length specification 
as in HIORD. 



Note: 



As 



previously stated, 
attribute of * is equal to the 



the length 
length of| 



the instruction in which it appears, except 
in an ECU to *, in which case the length 
attribute is 1. 



Terms in Parenthes es 



Terms in parentheses are reduced to a 
single value; thus, the terms in parenthe- 
ses, in effect, become a single term. 

Arithmetically combined terms, enclosed 
in parentheses, may be used in combination 
with terms outside the parentheses, as 
follows: 

14+BETA- (GAMMA- LAMBDA) 

When the assembler program encounters 
terms in parentheses in combination with 
other terms, it first reduces the combina- 
tion of terms inside the parentheses to a 
single value which may be absolute or 
relocatable, depending on the combination 
of terms. This value then is used in 
reducing the rest of the combination to 
another single value. 



Terms in parentheses may be included 
within a set of terms in parentheses: 

A+B-(C+D-(E+F)+10) 



The innermost set of terms in parenthe- 
ses is evaluated first. Five levels of 
parentheses are allowed; a level of paren- 
theses is a left parenthesis and its cor- 
responding right parenthesis. Parentheses 
which occur as part of an operand format do 
not count in this limit. An arithmetic 
combination of terms is evaluated as de- 
scribed in the next section "Expressions." 



EXPRESSIONS 



This subsection discusses the expres- 
sions used in coding operand entries for 
source statements . Two types of expres- 
sions, absolute and relocatable, are pre- 
sented along with the rules for determining 
these attributes of an expression. 

As shown in Figure 2-3, an expression is 
composed of a single term or an arithmetic 
combination of terms. The following are 
examples of valid expressions: 



BETA* 10 

B'101* 

C ' ABC * 

29 

L* FIELD 

LAMBDA+GAMMA 

TEN/TWO 



AREA1+X*2D' 

*+32 

N-25 

FIELD+332 

FIELD 

(EXIT-ENTRY+1) +G0 

=F , 1234' 

ALPHA-BETA/ (10+ AREA+L' FIELD) -100 

The rules for coding expressions are: 

1. An expression cannot start with an 
arithmetic operator, ( +-/* ) . There- 
fore, the expression -A+BETA is inval- 
id. However, the expression 0-A+BETA 
is valid. 

2. An expression cannot contain two 
terms or two operators in succession. 

3. An expression cannot consist of more 
than 16 terms. 

4. An expression cannot have more than 
five levels of parentheses. 

5 « A multiterm expression cannot con- 
tain a literal. 



Evaluation of Expressions 

A single — term expression, e.g., 29, 
BETA, *, L* SYMBOL, takes on the value of 
the term involved. 

A multiterm expression, e.g., BETA+10, 
ENTRY-EXIT, 25*10+A/B, is reduced to a 
single value, as follows: 

1. Each term is evaluated. 

2. Every expression is computed to 32 
bits, and then truncated to the right- 
most 24 bits. 

3. Arithmetic operations are performed from 
left to right except that multiplication 
and division are done before addition 
and subtraction, e.g., A+B*C is evaluatec 
as A+(B*C) , not (A+B)*C. The computed 
result is the value of the expression. 
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4. Division always yields an integer 
result; any fractional portion of the 
result is dropped. E.g. , 1/2*10 
yields a zero result, whereas 10*1/2 
yields 5. 

5. Division by zero is permitted and 
yields a zero result. 

Parenthesized multiterm subexpressions 
are processed before the rest of the terms 
in the expression, e.g., in the expression 
A+BETA*(CON-10) , the term CON-10 is 
evaluated first and the resulting value is 
used in computing the final value of the 
expression. 

Negative values are carried in twos 
complement form. Final values of ex- 
pressions are the rightmost 24 bits of 
the results. Intermediate results have 
a range of -231 through 2 31 -1. However, 
the value of an expression before trunca- 
tion must be in the range -2 24 through 
2 24_i or the results will be meaningless. 
A negative result is considered to be a 
3-byte positive value. 

NOTE: In A-type address constants, the 
full 32-bit final expression result is 
truncated on the left to fit the specified 
or implied length of the constant. 



Absolute and Relocatable Expressions 



An expression is called absolute if its 
value is unaffected by program relocation. 

An expression is called relocatable if 
its value depends upon program relocation. 

The two types of expressions, absolute 
and relocatable, take on these charac- 
teristics from the term or terms composing. 
them. 

Absolute Expression ; An absolute expres- 
sion can be an absolute term or any arith- 
metic combination of absolute terms. An 
absolute term can be a non-relocatable 
symbol, any of the self-defining terms, or 
the length attribute reference. As indi- 
cated in Figure 2-3, all arithmetic opera- 
tions are permitted between absolute terms . 

An expression is absolute, even though 
it may contain relocatable terms (RT) — 
alone or in combination with absolute terms 
(AT) — under the following conditions. 

1. There must be an even number of relo- 
catable terms in the expression. 

2. The relocatable terms must be paired. 
Each pair of terms must have the same 
relocatability, i.e., they appear in 
the same control section in this 
assembly (see Program Sectioning and 
Linking, Section 3) . Each pair must 



consist of terms with opposite signs. 
The paired terms do not have to be 
contiguous, e.g., RT+AT-RT. 

3. No relocatable term can enter into a 
multiply or divide operation. Thus, 
RT-RT+10 is invalid. However, 
(RT-RT)*10 is valid. 

The pairing of relocatable terms (with 
opposite signs and the same relocat- 
ability) cancels the effect of reloca- 
tion since both symbols would be relocated 
by the same amount. Therefore the value 
represented by the paired terms remains 
constant, regardless of program relocation. 
For example, in the absolute expression 
A-Y+X, A is an absolute term, and X and Y 
are relocatable terms with the same re- 
locatability. If A equals 50, Y equals 
25, and X equals 10, the value of the 
expression would be 35. If X and Y are 
relocated by a factor of 100 their values 
would then be 125 and 110. However, the 
expression would still evaluate as 35 
(50-125+110=35) . 

An absolute expression reduces to a 
single absolute value. 

The following examples illustrate abso- 
lute expressions. A is an absolute term; X 
and Y are relocatable terms with the same 
relocatability. 

A-Y+X 

A 

A*A 

X-Y+A 

*-Y (a reference to the location counter 
must be paired with another relocata- 
ble term from the same control sec- 
tion, i.e., with the same relocatabil- 
ity) 



Relocatable Expressions : A relocatable 
expression is one whose value changes by 
n if the program in which it appears is 
relocated n bytes away from its originally 
assigned area of storage. All relocatable 
expressions must have a positive value. 

A relocatable expression can be a relo- 
catable term. A relocatable expression can 
contain relocatable terms -- alone or in 
combination with absolute terms — under 
the following conditions: 



1. There must be an odd number of reloca- 
table terms. 

2. All the relocatable terms but one must 
be paired. Pairing is described in 
Absolute Expression . 

3. The unpaired term must not be directly 
preceded by a minus sign. 

4. No relocatable term can enter into a 
multiply or divide operation. 
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A relocatable expression reduces to a 
single relocatable value. This value is 
the value of the odd relocatable term, 
adjusted by the values represented by the 
absolute terms and/or paired relocatable 
terms associated with it. The relocatabil- 
ity attribute is that of the odd relocata- 
ble term. 

For example, in the expression W-X+W-10, 
W and X are relocatable terms with the same 
relocatability attribute. If initially W 
equals 10 and X equals 5, the value of the 
expression is 5. However, upon relocation 
this value will change. If a relocation 
factor of 100 is applied, the value of the 
expression is 105. Note that the value of 
the paired terms, W-X, remains constant at 
5 regardless of relocation. Thus, the new 



value of the expression, 105, is the result 
of the value of the odd term (W) adjusted 
by the values of W-X and 10. 



The following examples illustrate relo- 
catable expressions. A is an absolute 
term, W and X are relocatable terms with 
the same relocatability attribute, Y is a 
relocatable term with a different relocat- 
ability attribute. 



Y-32+A W-X+* 
W-X+Y 

* (reference to 
location counter) 



=F'123U' (literal) 

A+A+W-W+Y 

W-X+W 

Y 
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SECTION 3: ADDRESSING — PROGRAM SECTIONING AND LINKING 



ADDRESSING 



BASE REGISTER INSTRUCTIONS 



The IBM System/360 addressing technique 
requires the use of a base register,, which 
contains the base address, and a displace- 
ment, which is added to the contents of the 
base register. The programmer may specify 
a symbolic address and request the assem- 
bler to determine its storage address com- 
posed of a base register and a displace- 
ment. The programmer may rely on the 
assembler to perform this service for him 
by indicating which general registers are 
available for assignment and what values 
the assembler may assume each contains. 
The programmer may use as many or as few 
registers for this purpose as he desires. 
The only requirement is that, at the point 
of reference, a register containing an 
address from the same control section is 
available, and that this address is less 
than or equal to the address of the item to 
which the reference is being made. The 
difference between the two addresses may 
not exceed 4095 bytes. 



ADDRESSES — EXPLICIT AND IMPLIED 



An address is composed of a displacement 
plus the contents of a base register. (In 
the case of RX instructions, the contents 
of an index register are also used to 
derive the address in the machine.) 



The USING and DROP assembler instruc- 
tions enable programmers to use expressions 
representing implied addresses as operands 
of machine-instruction statements, leaving 
the assignment of base registers and the 
calculation of displacements to the assem- 
bler. 



In order to use symbols in the operand 
field of ma chine -instruction statements, 
the programmer must (1) indicate to the 
assembler, by means of a USING statement, 
that one or more general registers are 
available for use as base registers, (2) 
specify, by means of the USING statement, 
what value each base register contains , and 
(3) load each base register with the value 
he has specified for it. 



Having the assembler determine base reg- 
isters and displacements relieves the pro- 
grammer of separating each address into a 
displacement value and a base address 
value. This feature of the assembler will 
eliminate a likely source of programming 
errors, thus reducing the time required to 
check out programs. To take advantage of 
this feature, the programmer uses the USING 
and DROP instructions described in this 
subsection- The principal discussion of 
this feature follows the description of 
both instructions. 



The programmer writes an explicit 
address by specifying the displacement and 
the base register number. In designating 
explicit addresses a base register may not 
be combined with a relocatable symbol. 



He writes an implied address by speci- 
fying an absolute or relocatable address. 
The assembler has the facility to select a 
base register and compute a displacement, 
thereby generating an explicit address from 
an implied address, provided that it has 
been informed (1) what base registers are 
available to it and (2) what each contains. 
The programmer conveys this information to 
the assembler through the USING and DROP 
assembler instructions. 



USING — Use Base Address Register 

The USING instruction indicates that one 
or more general registers are available for 
use as base registers. This instruction 
also states the base address values that 
the assembler may assume will be in the 
registers at object time. Note that a 
USING instruction does not load the reg- 
isters specified. It is the programmer's 
responsibility to see that the specified 
base address values are placed into the 
registers. Suggested loading methods are 
described in the subsection "Programming 
with the USING Instruction. " A reference 
to any name in a control section cannot 
occur in a machine instruction or an S-type 
address constant before the USING statement 
that makes that name addressable. The 
format of the USING instruction statement is : 
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r t t 

I Name (Operation | Operand 



A se- 



" - w I USING 
j quence 

! symbol 

or 

blank 



4 

| From 2-17 expressions! 
j of the form v, rl, j 
|r2,r3, . . . , rl6 | 



I 



J 



Operand v must be an absolute or reloca- 
table expression. It may be a negative 
number whose absolute value does not exceed 
2 2t *. No literals are permitted. Operand v 
specifies a value that the assembler can 
use as a base address. The other operands 
must be absolute expressions. The operand 
rl specifies the general register that can 
be assumed to contain the base address 
represented by operand v. Operands r2 f r3 f 
r4, . . . specify registers that can be 
assumed to contain v+4096, v+8192, v+12288, 
. , respectively. The values of the 
operands rl, r2 r r3, . .., rl6 must be 
between and 15. For example, the state- 
ment: 



2. register must be specified as operand 

rl. 

The assembler assumes that register 
contains zero. Therefore, regardless of 
the value of operand v, it calculates dis- 
placements as if operand v were absolute 
or relocatable zero. The assembler also 
assumes that subsequent registers specified 
in the same USING statement contain 4096, 
8192, etc. 

NOTE: If register is used as a base 
register, the program is not relocatable, 
despite the fact that operand v may be 
relocatable. The program can be made re- 
locatable by: 

1. Replacing register in the USING 
statement. 

2. Loading the new register with a re- 
locatable value. 

3. Reassembling the program. 



r t t 1 

j Name | Operation | Operand j 

j. x x ^ 

| |USING |*, 12, 13 | 

L X X J 



tells the assembler it may assume that the 
current value of the location counter will 
be in general register 12 at object time, 
and that the current value of the location 
counter, incremented by 4096, will be in 
general register 13 at object time. 

If the programmer changes the value in a 
base register currently being used, and 
wishes the assembler to compute displace- 
ment from this value, the assembler must be 
told the new value by means of another 
USING statement. In the following sequence 
the assembler first assumes that the value 
of ALPHA is in register 9. The second 
statement then causes the assembler to 
assume that ALPHA+1000 is the value in 
register 9 . 



Name 



h 



"T T 

| Operation | Operand 



USING j ALPHA, 9 

I 

I 
USING I ALPHA+1000, 9 



If the programmer has to refer to the 
first 4096 bytes of storage, he can use 
general register as a base register sub- 
ject to the following conditions: 

1. The value of operand v must be either 
absolute or relocatable zero or simply 
relocatable, and 



DROP — Drop Base Register 



The DROP instruction specifies a pre- 
viously available register that may no 
longer be used as a base register. The 
format of the DROP instruction statement is 
as follows: 



r t t 

(Name | Operation | Operand 



A se- 
quence 
symbol 
or 
blank 



[DROP | Up to 16 absolute 

| j expressions of the 

| jform rl,r2, 

I |r3,...,rl6 

L X 



The expressions indicate general reg- 
isters previously named in a USING state- 
ment that are now unavailable for base 
addressing. The following statement, for 
example, prevents the assembler from using 
registers 7 and 11: 

r t t n 

| Name | Operation J Operand | 

| + + _ .| 

| | DROP | 7, 11 | 

I X X J 



It is not necessary to use a DROP 
statement when the base address being used 
is changed by a USING statement; nor are 
DROP statements needed at the end of the 
source program. 

A register made unavailable by a DROP 
instruction can be made available again by 
a subsequent USING instruction. 
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PROGRAMMING WITH THE USING INSTRUCTION 



The USING (and DROP) instructions may be 
used anywhere in a program, as often as 
needed, to indicate the general registers 
that are available for use as base reg- 
isters and the base address values the 
assembler may assume each contains at ex- 
ecution time. Whenever an address is spec- 
ified in a machine- instruction statement, 
the assembler determines whether there is 
an available register containing a suitable 
base address. A register is considered 
available for a relocatable address if it 
was specified in a USING instruction to 
have a relocatable value. A register with 
an absolute value is available only for 
absolute addresses. In either case, the 
base address is considered suitable only if 
it is less than or equal to the address of 
the item to which the reference is made. 
The difference between the two addresses 
may not exceed 4 095 bytes. In calculating 
the base register to be used, the assembler 
will always use the available register 
giving the smallest displacement. If there 
are two registers with the same value, the 
highest numbered register will be chosen. 




location. When employing this method, the 
USING instruction must immediately follow 
the BALR instruction. No other USING or 
load instructions are required if the loca- 
tion named LAST is within 4 095 bytes of 
FIRST. 

In Figure 3-1, the BALR and LM instruc- 
tions load registers 2-5. The USING 
instruction indicates to the assembler that 
these registers are available as base reg- 
isters for addressing a maximum of 16,384 
consecutive bytes of storage, beginning 
with the location named HERE. The number 
of addressable bytes may be increased or 
decreased by altering the number of reg- 
isters designated by the USING and LM 
instructions and the number of address 
constants specified in the DC instruction. 



RELATIVE ADDRESSING 



Relative addressing is the technique of 
addressing instructions and data areas by 
designating their location in relation to 
the location counter or to some symbolic 
location. This type of addressing is 
always in bytes, never in bits, words, or 
instructions. Thus, the expression *+4 
specifies an address that is four bytes 
greater than the current value of the 
location counter. In the sequence of 
instructions shown in the following exam- 
ple, the location of the CR machine 
instruction can be expressed in two ways, 
ALPHA+2 or BETA-4, because all of the 
mnemonics in the example are for 2-byte 
instructions in the RR format. 



In the preceding sequence, the BALR 
instruction loads register 2 with the 
address of the first storage location 
immediately following. In this case, it is 
the address of the instruction named FIRST. 
The USING instruction indicates to the 
assembler that register 2 contains this 



r t 

| Name | Operation 
(. + 

j ALP HA JLR 

I ICR 

j |BCR 

| BETA |AR 



| Operand 
4 

|3,4 
|4,6 
|1,14 
|2,3 
-X 



"T T 

| Operation | Operand 



I Name 



j. + + 

|2,0 

j HERE, 2, 3, 4, 5 

|3,5,BASEADDR 

I FIRST 

I A(HERE+4096 , HERE+8192, HERE+12288) 



BEGIN 


|BALR 




| USING 


HERE 


|LM 




|B 


BASE ADD R 


|DC 


FIRST 


1 . 



LAST 



END 



BEGIN 



L J. X_. , ■ J 

Figure 3-1. Multiple Base Register Assignment 
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PROGRAM SECTIONING AND LINKING 



It is often convenient, or necessary, to 
write a large program in sections. The 
sections may be assembled separately, then 
combined into one object program. The 
assembler provides facilities for creating 
multisectioned programs and symbolically 
linking separately assembled programs or 
program sections. 



Sectioning a program is optional, and 
many programs can best be written without 
sectioning them. The programmer writing an 
unsectioned program need not concern him- 
self with the subsequent discussion of 
program sections, which are called control 
sections. He need not employ the CSECT 
instruction, which is used to identify the 
control sections of a multisection program. 
Similarly, he need not concern himself with 
the discussion of symbolic linkages if his 
program neither requires a linkage to nor 
receives a linkage from another program. 
He may, however, wish to identify the 
program and/or specify a tentative starting 
location for it, both of which may be done 
by using the START instruction. He may 
also want to employ the dummy section 
feature obtained by using the DSECT 
instruction. 

Note; Program sectioning and linking is 
closely related to the specification of 
base registers for each control section. 
Sectioning and linking examples are provid- 
ed under' the heading "Addressing External 
Control Sections. " 



program are often used interchangeably. ) 
An unsectioned program is treated as a 
single control section. To the linkage 
editor, there are no programs, only control 
sections that must be fashioned into a load 
module. 

The output from the assembler is called 
an object module. It contains data re- 
quired for linkage editor processing. The 
external symbol dictionary, which is part 
of the object module, contains information 
the linkage editor needs in order to com- 
plete cross-referencing between control 
sections as it combines them into an object 
program. The linkage editor can take 
control sections. from various assemblies 
and combine them properly with the help of 
the corresponding control dictionaries. 
Successful combination of separately 
assembled control sections depends on the 
techniques used to provide symbolic 
linkages between the control sections. 



Whether the programmer writes an unsec- 
tioned program, a multisection program, or 
part of a multisection program, he still 
knows what eventually will be entered into 
storage because he has described storage 
symbolically. He may not know where each 
section appears in storage, but he does 
know what storage contains. There is no 
constant relationship between control sec- 
tions. Thus, knowing the location of one 
control section does not make another con- 
trol section addressable by relative 
addressing techniques. 



CONTROL SECTIONS 



The concept of program sectioning is a 
consideration at coding time, assembly 
time, and load time. To the programmer, a 
program is a logical unit. He may want to 
divide it into sections called control 
sections; if so, he writes it in such a way 
that control passes properly from one sec- 
tion to another regardless of the relative 
physical position of the sections in stor- 
age. A control section is a block of 
coding that can be relocated, independently 
of other coding, at load time without 
altering or impairing the operating logic 
of the program. It is normally identified 
by the CSECT instruction. However, if it 
is desired to specify a tentative starting 
location, the START instruction may be used 
to identify the first control section. 



The programmer must be aware that there 
is a limit to external symbol dictionary 
entries. The total number of control 
sections, dummy sections, unique symbols 
in EXTRN and WXTRN statements, V-type 
address constants, and external dummy 
sections must not exceed 255. Certain con- 
stants may cause a symbol to be counted 
twice: e.g., external symbols in V-type 
address constants (unless they are expli- 
citly defined in an EXTRN or WXTRN state- 
ment) , and external dummy sections 
implicitly defined by Q-type address 
constants and corresponding DSECT state- 
ments. EXTRN and WXTRN statements are 
described in this section; V-type and 
Q-type constants in Section 5 under 
"Operand Subfield 4: Constant." 



Control Section Location Assignment 



To the assembler, there is no such thing 
as a program; instead, there is an assem- 
bly, which consists of one or more control 
sections. (However, the terms assembly and 



Control sections can be intermixed 
because the assembler provides a location 
counter for each control section. Loca- 
tions are assigned to control sections as 



22 



if the sections are placed in storage The assembler uses the self-defining 
consecutively, in the same order as they term specified by the operand as the ini- 
f irst occur in the program. Each control tial location counter value of the program, 
section subsequent to the first begins at This value should be divisible by eight, 
the next available double-word boundary. For example, either of the following state- 
ments could be used to assign the name 
PR0G2 to the first control section and to 
indicate an initial assembly location coun- 
ter value of 2040. If the operand is omit- 
ted, the assembler sets the initial location 
counter value of the program at zero. The 
location counter is set at the next double- 
word boundary when the value of the START 
operand is not divisible by eight. 
Its initial location counter value may 
be specified as an absolute value, if 

the START instruction is used. r ~ "J". ~ ~ . . "J". , ^ 

| Name | Operation | Operand | 

It contains the literals of the program, i i ! .j 

unless their positioning has been altered |prog2 I START |2040 | 

by LTORG statements. JPROG2 | START |X'7F8' | 

L X X J 



FIRST CONTROL SECTION 



The first control section of a program 
has the following special properties: 



START — Start Assembly 



The START instruction may be used to 
give a name to the first (or only) control 
section of a program. It may also be used 
to specify an initial location counter 
value for the first control section of the 
program. The format of the START instruc- 
tion statement is as follows: 

r t t 1 

(Name | Operation | Operand | 

j. + + ^ 

| Any j START JA self -defining | 
| symbol | jterm, or blank | 

j or blank j j j 

i 1 x j 

If a symbol names the START instruction, 
the symbol is established as the name of 
the control section. If not, the control 
section is considered to be unnamed. All 
subsequent statements are assembled as part 
of that control section. This continues 
until a CSECT instruction identifying a 
different control section or a DSECT 
instruction is encountered. A CSECT 
instruction named by the same symbol that 
names a START instruction is considered to 
identify the continuation of the control 
section first identified by the START. 
Similarly, an unnamed CSECT that occurs in 
a program initiated by an unnamed START is 
considered to identify the continuation of 
the unnamed control section. 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the 
control section. It has a length attribute 
of 1. 



Note : The START instruction must not be 
preceded by any code that will cause an 
uhnamedr. control section to be sssembled. 
(See "Unnamed First Control Section" 
below. ) 

CSECT — Identify Control Section 



The CSECT instruction identifies the 
beginning or the continuation of a control 
section. The format of the CSECT instruc- 
tion statement is as follows: 



r t t 1 

| Name | Operation | Operand | 

j. x x ^ 

| Any | CSECT | Not used; should | 
| symbol j | be blank j 

lor blank | I \ 

L x 1 J 

If a symbol names the CSECT instruction, 
the symbol is established as the name of 
the control section; otherwise the section 
is considered to be unnamed. All state- 
ments following the CSECT are assembled as 
part of that control section until a state- 
ment identifying a different control sec- 
tion is encountered (i.e., another CSECT or 
a DSECT instruction) . 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the 
control section. It has a length attribute 
of 1. 

Several CSECT statements with the same 
name may appear within a program. The 
first is considered to identify the begin- 
ning of the control section; the rest 
identify the resumption of the section. 
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Thus, statements from different control 
sections may be interspersed. They are 
properly assembled (assigned contiguous 
storage locations) as long as the state- 
ments front the various control sections are 
identified by the appropriate CSECT 
instructions. 



Of course, it is possible to write a pro- 
gram that does not contain CSECT or START 
statements. It will then be assembled as 
one unnamed control section. 



DSECT — Identify Dummy Section 



Unnamed First Control Section 

All machine instructions and many assem- 
bler instructions have to belong to a con- 
trol section. If such an instruction pre- 
cedes the first CSECT instruction, the 
assembler will consider it to belong to an 
unnamed control section (also referred to 
as private code) , which will be the first 
(or only) control section in the module. 

The following instructions will not 
cause this to happen, since they do not 
have to belong to a control section: 

Common Control Sections 

Dummy Control Sections 

Macro Definitions 

Conditional Assembly Instructions 

Comments 

COPY (depends on the copied code) 

DXD 

EJECT 

ENTRY 

EXTRN 

ICTL 

ISEQ 

OPSYN 

PRINT 

PUNCH 

REPRO 

SPACE 

TITLE 

WXTRN 

No other assembler or machine instructions 
can precede a START instruction, since START, 
if used, must initiate the first control 
section in the program. 

An involuntary unnamed control section 
at the beginning can cause trouble if 
literals are used. Then the programmer must 
be aware of the fact, that unless he codes 
an LTORG statement in each control section 
where he uses literals, literals will be 
assembled in the first control section, 
which will in this case be the involuntary 
section. If that control section does not 
establish addressability (through USING) , 
an addressability error will be the result. 
Therefore statements like EQU should not 
be placed before the first CSECT or the 
START instruction. 

Resumption of an unnamed control section 
at later points can be accomplished through 
unnamed CSECT statements . A program can 
contain only one unnamed control section. 



A dummy section represents a control 
section that is assembled but is not part 
of the object program. A dummy section is 
a convenient means of describing the layout 
of an area of storage without actually 
reserving the storage. (It is assumed that 
the storage is reserved either by some 
other part of this assembly or else by 
another assembly. ) The DSECT instruction 
identifies the beginning or resumption of a 
dummy section. More than one dummy section 
may be defined per assembly, but each must 
be named. The format of the DSECT instruc- 
tion statement is as follows: 



Name 


Operation 


Operand 


A vari- 
able symbol 
or ordinary 
symbol 


DSECT 


Not used; should 
be blank 



The symbol in the name field is a valid 
relocatable symbol whose value represents 
the first byte of the section. It has a 
length attribute of 1. 

Program statements belonging to dummy 
sections may be interspersed throughout the 
program or may be written as a unit. In 
either case, the appropriate DSECT instruc- 
tion should precede each set of statements. 
When multiple DSECT instructions with the 
same name are encountered, the first is 
considered to initiate the dummy section 
and the rest to continue it. All assembler 
language instructions may occur within 
dummy sections. 

Symbols that name statements in a dummy 
section may be used in USING instructions. 
Therefore, they may be used in program 
elements (e.g., machine-instructions and 
data definitions) that specify storage 
addresses. An example illustrating the use 
of a dummy section appears subsequently 
under "Addressing Dummy Sections. " 
Note : Symbols that name statements in a 
dummy section may be used in A-type address 
constants only when they are paired with 
another symbol from the same dummy section 
in an absolute expression. (See "Absolute 
and Relocatable Expressions", Section 2). 
For example, if X and B name statements in 
the same dummy section, C DC A(B-X) would 
be valid, but C DC A(X) would be invalid — 
yielding a relocatability error. 
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DUMMY SECTION LOCATION ASSIGNMENT; A loca- 
tion counter is used to determine the 
relative locations of named program ele- 
ments in a duroiry section. The location 
counter is always set to zero at the 
beginning of the dummy section, and the 
location values assigned to symbols that 
name statements in the dummy section are 
relative to the initial statement in the 
section. 



Assembly 1, during execution, loads the 
actual beginning address of the input area 
in general register 3. Because the symbols 
used in the DSECT section are defined 
relative to the initial statement in the 
section, the address values they represent, 
will, at the time of program execution, be 
the actual storage locations of the input 
area. 



ADDRESSING DUMMY SECTIONS; The programmer 
may wish to describe the format of an area 
whose storage location will not be deter- 
mined until the program is executed. He 
can describe the format of the area in a 
dummy section, and he can use symbols 
defined in the dummy section as the oper- 
ands of machine instructions. To effect 
references to the storage area, he does the 
following: 

1. Provides a USING statement specifying 
both a general register that the 
assembler can assign to the machine- 
instructions as a base register and a 
value from the dummy section that the 
assembler may assume the register con- 
tains. 

2. Ensures that the same register is 
loaded with the actual address of the 
storage area. 

The values assigned to symbols defined 
in a dummy section are relative to the 
initial statement of the section. Thus, 
all machine-instructions which refer to 
names defined in the dummy section will, at 
execution time, refer to storage locations 
relative to the address loaded into the 
register. 

An example is shown in the following 
coding. Assume that two independent assem- 
blies (assembly 1 and assembly 2) have been 
loaded and are to be executed as a single 
overall program. Assembly 1 is an input 
routine that places a record in a specified 
area of storage, places the address of the 
input area containing the record in general 
register 3, and branches to assembly 2. 
Assembly 2 processes the record. The cod- 
ing shown in the example is from assembly 
2. 

The input area is described in assembly 
2 by the DSECT control section named INAR- 
EA. Portions of the input area (i.e., 
record) that the programmer wishes to work 
with are named in the DSECT control section 
as shown. The assembler instruction USING 
INAREA,3 designates general register 3 as 
the base register to be used in addressing 
the DSECT control section, and that general 
register 3 is assumed to contain the 
address of INAREA. 



Name 



h 



-T T 

| Operation | Operand 



| ASMBLY2 


CSECT 


| BEGIN 


BALR 




USING 




USING 




CLI 




BE 


| ATYPE 


MVC 




MVC 


| WORKA 


DS 


| WORKB 


DS 


| INAREA 


DSECT 


| INCODE 


DS 


| INPUTA 


DS 


| INPUTB 


DS 




END 



2,0 
*,2 



INAREA, 3 
INCODE, C A* 
ATYPE 



| WORKA, INPUTA 
WORKB, INPUTB 



CL20 
CL18 



CLI 
CL20 
CLI 8 



The programmer must ensure that a section 
of code in his program is actually described 
by the dummy section which references it. 
Consider the following example, which 
illustrates how a dummy section should not 
be addressed: 



Name 


Operation 


Operand 


TEST 

HALF 
FULL 


CSECT 

CNOP 

DS 

DS 

END 


2,4 
CL2 

F 


AREA 
HALF 
FULL 


DSECT 

DS 

DS 


CL2 
F 
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Note that in the dummy section AREA, two 
bytes are skipped between HALF and FULL in 
order to align FULL on a fullword boundary. 
In the control section TEST, however, the 
CNOP instruction causes two bytes to be 
skipped. Thus FULL is properly aligned with- 
out skipping any bytes between HALF and 
FULL . 

When the programmer addresses the dummy 
section, the location of FULL (relative to 
the location of HALF) will not be the same 
as the location of FULL in the control 
section. 

Note ; To correct this example change the 
CNOP instruction to CNOP 0,4. 

EXTERNAL DUMMY SECTIONS (ASSEMBLER F ONLY) 

External dummy sections facilitate com- 
munication between programs by allowing the 
programmer to define work areas in several 
different programs and then at execution to 
combine them into one block of storage 
accessible to each program. Several dif- 
ferent programs may be assembled together, 
each with one or more external dummy sec- 
tions and after the linkage editor process-" 
es these programs, the programmer can allo- 
cate storage for the dummy sections in one 
block. External dummy sections are defined 
through the use of the DXD instruction or a 
DSECT in combination with a Q-type DC in- 
struction. In order to allocate the cor- 
rect amount of storage when the program is 
executed, the programmer must use the CXD 
instruction, described below, within one 
of the programs. 

DXD — DEFINE EXTERNAL DUMMY SECTION 

The DXD instruction (also referred to 
as a Pseudo Register) defines an external 
dummy section; when the assembler encoun- 
ters a DXD instruction, it computes the 
amount of storage required and the align- 
ment and passes this information to the 
linkage editor which will compute the total 
length of the external dummy sections. The 
format for the DXD instruction is: 



uses the largest section in computing total 
length; if two or more identically named 
external dummy sections have different 
boundary alignments, the linkage editor 
uses the most restrictive alignment in 
computing total length. An external dummy 
section is generated by a Q-type address 
constant which references a DSECT name. 



CXD - CUMULATIVE LENGTH EXTERNAL DUMMY 
SECTION 



The CXD instruction allocates a four-byte 
full-word aligned area in storage which will 
contain the sum of the lengths of all ex- 
ternal dummy sections when the program is 
executed. This sum is supplied by the link- 
age editor. The instruction format is: 

r T T t 

| Name | Operation | Operand | 

K k— i + + * 

j Any symbol or j CX d JMust be blank j 
I blank j j t 

The CXD instruction may appear anywhere 
within a program, or if several programs 
are being combined, it may appear in each 
program. The symbol in the name field 
has a length attribute of 4. 

The following example shows how external 
dummy sections may be used. 

ROUTINE A 



| Name j Operation 

> 1 + 4 



ALPHA 

BETA 

OMEGA 



I DXD 
JDXD 
j CXD 
I - 
I • 
| DC 
| DC 



| Operand 

+- 

J2DL8 

J4FL4 



Q (ALPHA) 
Q(BETA) 



L J 



X J 



r -t t 1 

I Name | Operation | Operand | 

|. x x 1 

| A symbol | DXD J Duplication factor, | 
| j jtype, length, constant | 
l j. x j 

The symbol in the name field is a symbol 
that usually appears as a Q-type constant 
in the operand field of a DC statement 
later in the program. It has a length 
attribute of 1. The operand form and 
alignment are the same as that described 
for the DS instruction. If more than one 
external dummy section with the same name 
is encountered by the linkage editor, it 



ROUTINE B 

r t t 1 

| Name | Operation J Operand | 
,. _ + x _ ., 



[GAMMA 
I DELTA 



| DXD 
I DXD 



| DC 
DC 



5D 
10F 



j Q ( GAMMA) 
Q (DELTA) 



I • I 

L X X J 
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ROUTINE C 



Name 



-T T 

| Operation | Operand 

-+ +- 

DXD | 4H 




Each of the three routines is requesting an 
amount of work area. Routine A wants 2 
double words and 4 full words. Routine B 
wants 5 double words and 10 full words. 
Routine C wants 4 half words. At the time 
these routines are brought into storage the 
sum of the individual lengths will be 
placed in the location of the CXD 
instruction labeled OMEGA. Routine A can 
then allocate the amount of storage that is 
specified in the CXD location. 



COM — DEFINE BLANK COMMON CONTROL SECTION 



The COM assembler instruction identifies 
and reserves a common area of storage that 
may be referred to by independent assem- 
blies that have been linked and loaded for 
execution as one overall program. 

Appearances of a COM statement after the 
initial one indicate the resumption of the 
blank common control section. 

When several assemblies are loaded, each 
designating a common control section, the 
amount of storage reserved is equal to the 
longest common control section. The format 
is: 



j Name 
h 

| A se- 
| quence 
| symbol or 
I blank 



[Operation | Operand 

-r 

I Blank 



I COM 



The common area may be broken up into 
subf ields through use of the DS and DC 
assembler instructions. Names of subf ields 
are defined relative to the beginning of 
the common section, as in the DSECT control 
section. 

It is necessary to establish address- 
ability relative to a named statement with- 
in COM since the COM statement itself can- 
not have a name. In the following example, 
addressability to the common area of stor- 
age is established relative to the named 
statement XYZ. 



i Name i Operation i Operand 

i _i j. 


J j L J 1,=A(XYZ) 

l l USING I XYZ,1 

| J MVC ! PDQ (16) ,=4C'ABCD' 

! J COM ! 

j XYZ j DS J 16F 

l PDQ l DS 1 16C 



No instructions or constants appearing 
in a common control section are assembled. 
Data can only be placed in a common control 
section through execution of the program. 
A blank common control section may include 
any assembler language instructions. 

If the assignment of common storage is 
done in the same manner by each independent 
assembly, reference to a location in common 
by any assembly results in the same loca- 
tion being referenced. When the blank 
common control section is assembled, the 
initial value of the location counter is 
set to zero. 



SYMBOLIC LINKAGES 

Symbols may be defined in one module 
and referred to in another, thus effecting 
symbolic linkages between independently 
assembled program sections. The linkages 
can be effected only if the assembler is 
able to provide information about the 
linkage symbols to the linkage editor, 
which resolves these linkage references at 
load time. The assembler places the ; 
necessary information in the external 
symbol dictionary on the basis of the 
linkage symbols identified by e.g., the 
ENTRY and EXTRN instructions. Note that 
these symbolic linkages are described as 
linkages between independent modules; 
more specifically, they are linkages 
between independently assembled control 
sections. 

In the module where the linkage symbol 
is defined (i.e., used as a name), it must 
also be identified to the assembler by 
means of the ENTRY assembler instruction 
unless the symbol is the name of a CSECT 
or START statement. It is identified as 
a symbol that names an entry point, which 
means that another module may use that 
symbol in order to effect a branch op- 
eration or a data reference. The assembler 
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places this information in the control 
dictionary. 

Similarly, the module that uses a sym- 
bol defined in some other module must 
identify it by the EXTRN or WXTRN assembler 
instruction. It is identified as an 
externally defined symbol (i.e., defined in 
another module) that is used to effect 
linkage to the point of definition. The 
assembler places this information in the 
external symbol dictionary. 

Another way to obtain symbolic linkages, 
is by using the V-type address constant. 
The subsection "Data Definition 
Instructions" in Section 5 contains the 
details pertinent to writing a V-type 
address constant. It is sufficient here to 
note that this constant may be considered 
an indirect linkage point. It is created 
from an externally defined symbol, but that 
symbol does not have to be identified by an 
EXTRN or WXTRN statement. The V-type 
address constant may be used for external 
branch references (i.e., for effecting 
branches to other programs) . It may not be 
used for external data references (i.e., 
for referring to data in other programs) . 

ENTRY — IDENTIFY ENTRY-POINT SYMBOL 



The ENTRY instruction identifies linkage 
symbols that are defined in one source 
module and referenced by other modules . 



r t t 1 

| Name | Operation J Operand | 

j. + _1 + < 

A se- j ENTRY | One or more reloca- 
quence j j table symbols,, 
symbol j j separated by 
or j j commas, that also 
blank j j appear as state- 
j jment names 
l j. . x J 



A source module may contain a maximum of 
100 ENTRY symbols. ENTRY symbols which are 
not defined (not appearing as statement 
names) , although invalid, will also count 
towards this maximum of 100 ENTRY symbols. 

The symbols in the ENTRY operand field 
may be used as operands by other programs. 
An ENTRY statement operand may not contain 
a symbol defined in a dummy section or in 
a blank common control section. The fol- 
lowing example identifies the statements 
named SINE and COSINE as entry points to 
the program. 



r T T 1 

| Name | Operation J Operand 

f x___ + _ ^ 

| | ENTRY | SINE, COSINE I 

I X X j 



Note ; Labels of START and CSECT statements 
are automatically treated as entry-points 
to a module. Thus they need not be ident- 
ified by ENTRY statements. 



EXTRN — IDENTIFY EXTERNAL SYMBOL 

The EXTRN instruction identifies linkage 
symbols used by one source module but identi- 
fied in another module. Each external symbol 
must be identified. This includes symbols 
that refer to control section names. The 
format of the EXTRN statement is: 



{ Name | Operation 


[.Operand 


| A se- ! EXTRN 


i One or more relocatable 


{ guence [ 


j symbols, separated by 


i symbol i 


i commas 


i or i 




j blank J 





The symbols in the operand field may not 
appear as the name of statements in the 
module where the EXTRN statement is. The 
length attribute of an external symbol 
is 1. 

The following example identifies three 
external symbols. They are used as operands 
in the module where they appear, but they 
are defined in some other module. 

r t t 1 

| Name | Operation | Operand | 

f x x ^ 

| j EXTRN |RATEBL,PAYCALC j 
| | EXTRN JWITHCALC | 

L X X . J 

An example that employs the EXTRN 
instruction appears subsequently under 
"Addressing External Control Sections." 

Note 1 ; A V-type address constant does 
not have to be identified by an EXTRN state- 
ment. 

Note 2 ; When external symbols are used in 
an expression they may not be paired. Each 
external symbol must be considered as having 
a unique relocatability attribute. 
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Addressing External Control Sections 



A common way for a program to link to an 
external control section is to: 



Create a V-type address constant with 
the name of the external symbol. 

Load the constant into a general reg- 
ister and branch to the control sec- 
tion via the register. 



The total number of control sections, 
dummy sections, external symbols and exter- 
nal dummy sections must not exceed 255. 
Certain constants may cause a symbol to be 
counted twice: external symbols in V-type 
address constants (unless they are expli- 
citly defined in an EXTRN or WXTRN state- 
ment) , and external dummy sections im- 
plicitly defined by Q-type address constants 
and corresponding DSECT statements. (EXTRN 
and WXTRN statements are discussed in this 
section; V-type constants in Section 5 
under the DC assembler instruction.) 



For example, to link to the control 
section named SINE, the following coding 
might be used: 



WXTRN — IDENTIFY WEAK EXTERNAL SYMBOL- 



Name 



y + + -H 



IMAINPROG 
BEGIN 



j Operation 

-+ 

CSECT 

JBALR 
I USING 



IBALR 



j Operand 
+- 



2,0 
*,2 



3,VCON 
1.3 



The WXTRN statement has the same format as 
the EXTRN statement. It is used to identify 
weak external references . The only differ- 
ence between a weak (WXTRN) and a strong 
(EXTRN or V-type constant) external refer- 
ence is that the automatic library call 
mechanism of the linkage editor or loader 
is not effective for symbols that are identi- 
fied in WXTRN statements. 



VCON 



DC 
I END 



|V(SINE) 
BEGIN 



L J. A J 

An external symbol naming data may be 
referred to as follows: 

1. Identify the external symbol with the 
EXTRN instruction, and create an 
address constant from the symbol. 

2. Load the constant into a general reg- 
ister, and use the register for base 
addressing. 

For example, to add to register 3 the 
contents of a data area named RATETBL, which 
is in another control section, the following 
coding might be used: 



Name 



■T T 

| Operation | Operand 



y + + 



MAINPROG 
BEGIN 



I CSECT 

BALR 

I USING 



2,0 
1**2 



The automatic library call mechanism 
searches the call library for any unresolved 
external references. If it finds any of 
these references, it includes the module 
where the reference occurs in the load 
module produced by the linkage editor or 
loader. Refer to OS Loader and Linkage 
Editor for a full description of the 
automatic library call mechanism. 

The format of the WXTRN instruction is : 



iName 


Operation i Operand 


i 


L X 


i A se- 


WXTRN i One or more relocatable 


• quence 


J symbols, separated by 


J symbol 


[ commas 


i or 




j blank 





| EXTRN 



I RATETBL 



RATEADDR 



L 
USING 

IA 



DC 
I END 



4 , RATEADDR 
| RATETBL, 4 
3, RATETBL 



| A (RATETBL) 
I BEGIN 



L _A J. J 



Note : If a V-type address constant is 
identified by a WXTRN instruction, the 
automatic library call mechanism is 
suppressed for it. 
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SECTION k: MACHINE- I NSTROCTIONS 



This section discusses the coding of the 
machine- instructions represented in the 
assembler language. The reader is reminded 
that the functions of each machine- 
instruction are discussed in the principles 
of operation manual (see Preface). 



MACHINE- INSTRUCTION STATEMENTS 



Machine-instructions may be represented 
symbolically as assembler language 
statements. The symbolic format of each 
varies according to the actual machine- 
instruction format, of which there are 
five: RR, RX f RS, SI, and SS. Within each 
basic format, further variations are 
possible. 

The symbolic format of a machine- 
instruction is similar to, but does not 
duplicate, its actual format. Appendix C 
illustrates machine format for the five 
classes of instructions. A mnemonic opera- 
tion code is written in the operation 
field, and one or more operands are written 
in the operand field. Comments may be 
appended to a machine- instruction statement 
as previously explained in Section 1. 

Any machine-instruction statement may be 
named by a symbol, which other assembler 
statements can use as an operand. The 
value attribute of the symbol is the 
address of the leftmost byte assigned to 
the assembled instruction. The length 
attribute of the symbol depends on the 
basic instruction format, as follows: 



Basic Format 


Lenqth Attribute 


RR 


2 


RX 


4 


RS 


4 


S 


4 


SI 


4 


SS 


6 


Instruction Al: 


Lqnment and Checkinq 



All machine-instructions are aligned 
automatically by the assembler on half-word 
boundaries. If any statement that causes 
information to be assembled requires align- 
ment, the bytes skipped are filled with 
hexadecimal zeros. All expressions that 
specify storage addresses are checked to 
ensure that they refer to appropriate 
boundaries for the instructions in which 



they are used. Register numbers are also 
checked to make sure that they specify the 
proper registers, as follows: 

1. Floating-point instructions must spec- 
ify floating-point registers 0, 2, 4, 
or 6. 

2. Double-shift, full-word multiply, and 
divide instructions must specify an 
even-numbered general register in the 
first operand. 



OPERAND FIELDS AND SUBFIELDS 



Some symbolic operands are written as a 
single field, and other operands are writ- 
ten as a field followed by one or two 
subfields. For example, addresses consist 
of the contents of a base register and a 
displacement. An operand that specifies a 
base and displacement is written as a 
displacement field followed by a base reg- 
ister subfield, as follows: 40(5). In the 
RX format, both an index register subfield 
and a base register subfield are written as 
follows: 40(3,5). In the SS format, both a 
length subfield and a base register sub- 
field are written as follows: 10(21,5). 

Appendix C shows two types of addressing 
formats for RX, RS, SI, and SS instruc- 
tions. In each case, the first type shows 
the method of specifying an address expli- 
citly, as a base register and displacement. 
The second type indicates how to specify an 
implied address as an expression. 

For example, a load multiple instruction 
(RS format) may have either of the follow- 
ing symbolic operands: 



R1,R3,D2(B2) 
R1,R3,S2 



explicit address 
implied address 



Whereas D2 and B2 must be represented by 
absolute expressions, S2 may be represented 
either by a relocatable or an absolute 
expression. 



In order to use implied addresses, 
following rules must be observed: 



the 



1. The base register assembler instruc- 
tions (USING and DROP) must be used. 

2. An explicit base register designation 
must not accompany the implied 
address. 
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For example, assume that FIELD is a 
relocatable symbol, which has been assigned 
a value of 7400. Assume also that the 
assembler has been notified (by a USING 
instruction) that general register 12 cur- 
rently contains a relocatable value of 4096 
and is available as a base register. The 
following example shows a machine- 
instruction statement as it would be 
written in assembler language and as it 
would be assembled. Note that the value of 
D2 is the difference between 7400 and 4096 
and that X2 is assembled as zero, since it 
was omitted. The assembled instruction is 
presented in hexadecimal: 

Assembler statement: 

ST 4, FIELD 

Assembled instruction: 

Op. Code Rl X2 B2 D2 
50 4 C CE8 

An address may be specified explicitly 
as a base register and displacement (and 
index register for RX instructions) by the 
formats shown in the first column of Table 
4-1. The address may be specified as an 
implied address by the formats shown in the 
second column. Observe that the two stor- 
age addresses required by the SS instruc- 
tions are presented separately; an implied 
address may be used for one, while an 
explicit address is used for the other. 



2. 



3. 



If the first subfield in the sequence 
is omitted, the comma that separates 
it from the second subfield is writ- 
ten. The parentheses must also be 
written. 



MVC 32(16,5),FIELD2 

MVC 32(,5),FIELD2 (implied length) 

If the second subfield in the sequence 
is omitted, the comma that separates 
it from the first subfield must be 
omitted. The parentheses must be 
written. 



MVC 32(16,5),FIELD2 
MVC FIELD1(16),FIELD2 



(implied 
address) 



Fields and subfields in a symbolic oper- 
and may be represented either by absolute 
or by relocatable expressions, depending on 
what the field requires. (An expression 
has been defined as consisting of one term 
or a series of arithmetically combined 
terms.) Refer to Appendix C for a detailed 
description of field requirements- 



Note: Blanks may not appear in an operand 
unless provided by a character self- 
defining term or a character literal. 
Thus, blanks may not intervene between 
fields and the comma separators, between 
parentheses and fields, etc. 



Table 4-1. Address Specification Details 

r t t — 1 

| Type | Explicit Address | Implied Address | 



| RX 


|D2(X2,B2) 


| S2(X2) 






|D2(,B2) 


| S2 




| RS 


|D2(B2) 


| S2 




1 si 


|D1(B1) 


| SI 




| SS 


|D1(L1,B1) 


| SI (LI) 






|D1(L,B1) 


| SKL) 






JD2(L2,B2) 


| S2(L2) 




I 


. X 


X - 


J 



A comma must separate operands. Paren- 
theses must enclose a subfield or sub- 
fields, and a comma must separate two 
subfields within parentheses. When paren- 
theses are used to enclose one subfield, 
and the subfield is omitted, the parenthe- 
ses must be omitted. In the case of two 
subfields that are separated by a comma and 
enclosed by parentheses, the following 
rules apply: 

1. If both subfields are omitted, the 
separating comma and the parentheses 
must also be omitted. 



2,48(4,5) 
2 , FIELD 



(implied address) 



LENGTHS — EXPLICIT AND IMPLIED 



The length field in SS instructions can 
be explicit or implied. To imply a length, 
the programmer omits a length field from 
the operand. The omission indicates that 
the length field is either of the 
following: 

1. The length attribute of the expression 
specifying the displacement, if an 
explicit base and displacement have 
been written. 

2. The length attribute of the expression 
specifying the effective address, if 
the base and displacement have been 
implied. 

In either case, the length attribute for 
an expression is the length of the leftmost 
term in the expression- The value of L'* 
is the length of the instruction in all 
non-literal machine instruction operands 
and in the CCW assembler instruction* In 
all other uses its value will be 1. 
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By contrast, an explicit length is writ- 
ten by the programmer in the operand as an 
absolute expression. The explicit length 
overrides any implied length. 

Whether the length is explicit or 
implied, it is always an effective length. 
The value inserted into the length field of 
the assembled instruction is one less than 
the effective length in the machine- 
instruction statement. 



Note; If a 
desired, the 
or one. 



length field of zero is 
length may be stated as zero 



To summarize, the length required in an 
SS instruction may be specified explicitly 
by the formats shown in the first column of 
Table 4-2 or may be implied by the formats 
shown in the second column. Observe that 
the two lengths required in one of the SS 
instruction formats are presented separate- 
ly. An implied length may be used for one, 
while an explicit length is used for the 
other . 



Table 4-2. Details of Length Specification 
in SS Instructions 



j Explicit Length j Implied Length 
y __ + 



| DKL1, Bl) 


Dl(,Bl) 


| SI (LI) 


SI 


| D1(L,B1) 


D1(,B1) 


| SKL) 


SI 


| D2(L2,,B2) 


D2(,B2) 


| S2CL2) 


S2 



MACHINE- INSTRUCTION MNEMONIC CODES 



data types in the DC assembler instruction 
(see Section 5). Furthermore, letters u 
and W have been added to indicate short and 
long,, unnormalized floating-point opera- 
tions, respectively. For example, AE indi- 
cates Add "Normalized Short, whereas AU 
indicates Add Unnormalized Short. Where 
applicable, full-word fixed-point data is 
implied if the data type is omitted. 



The letters R and I are added to the 
codes to indicate, respectively,, RR and SI 
machine instruction formats. Thus, AER 
indicates Add Normalized Short in the RR 
format. Functions involving character and 
decimal data types imply the SS format. 



MACHINE- INSTRUCTION EXAMPLES 



The examples that follow are grouped 
according to machine- instruction format. 
They illustrate the various symbolic oper- 
and formats. All symbols employed in the 
examples must be assumed to be defined 
elsewhere in the same assembly. All sym- 
bols that specify register numbers and 
lengths must be assumed to be equated 
elsewhere to absolute values. 

Implied addressing, control section 
addressing, and the function of the USING 
assembler instruction are not considered 
here. For discussion of these considera- 
tions and for examples of coding sequences 
that illustrate them, the reader is 
referred to Section 3 if "Program Sectioning 
and Linking" and "Base Register Instruc- 
tions . " 



The mnemonic operation codes (shown in 
Appendix D) are designed to be easily 
remembered codes that indicate the func- 
tions of the instructions. The normal 
format of the code is shown below; the 
items in brackets are not necessarily pre- 
sent in all codes : 

Verb [Modifier] [Data Type] [Machine Format] 

The verb, which is usually one or two 
characters,, specifies the function. For 
example, A represents Add ,, and MV rep- 
resents Move. The function may be further 
defined by a modifier. For example, the 
modifier L indicates a logical function,, as 
in AL for Add Logical. 

Mnemonic codes for functions involving 
data usually indicate the data types by 
letters that correspond to those for the 



RR Format 



r t t 

I Name | Operation | Operand 



j. 

JALPHA1 
JALPHA2 
j BETA 
JGAMMA1 
JGAMMA2 
l 



|LR 
|LR 
JSPM 
| SVC 
I SVC 



1 1*2 

|REG1,REG2 
1 15 
| 250 

j TEN 

-X 



The operands of ALPHA1, BETA, and GAMMA1 
are decimal self-defining values, which are 
categorized as absolute expressions. The 
operands of ALPHA2 and GAMMA2 are symbols 
that are equated elsewhere to absolute 
values. 
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RX Format 



S Format 



|Name 
1 


| Operation 

1 

j._ 


| Operand 

1 

X — — — 


_ j 


r 


T 


T — 


1 


| ALPHA1 


|L 


|1,39(4 # 10) 




| ALPHA2 


|L 


|REG1,39(4,TEN) 




| BETAl 


|L 


|2,ZETA(U) 




| BETA 2 


|L 


|REG2, ZETA(REG4) 




|GAMMA1 


|L 


| 2 , ZETA 




|GAMMA2 


|L 


|REG2,ZETA 




|GAMMA3 


|L 


|2,=F'1000' 




| LAMBDA1 


|L 


|3,20(,5) 




L 


X _ 


x _ 


. ...i 



Both ALPHA instructions specify explicit 
addresses; REG1 and TEN are absolute sym- 
bols. Both BETA instructions specify 
implied addresses,, and both use index reg- 
isters. Indexing is omitted from the GAMMA 
instructions. GAMMAl and GAMMA2 specify 
implied addresses. The second operand of 
GAMMA3 is a literal. LAMBDA1 specifies no 
indexing. 



j Name j Operation | Operand 



! GAMMAl | 

j GAMMA2 | 

j GAMMA3 j 

I GAMMA4 ! 
I l 



1 



SIO 
SIO 
SIO 
SIO 



40(9) 
0(9) 
40(0) 
ZETA 



The GAMMAl, GAMMA2 and GAMMA3 instructions 
specify explicit addresses. The GAMMA4 in- 
struction specifies an implied address. The 
GAMMA2 instruction specifies a displacement 
of zero. The GAMMA3 instruction does not 
specify a base register. 



SS Format 



RS Format 



Name 



h 



-+- 



Operation 



- T 

| Operand 



| ALPHA1 | BXH 
| ALPHA2 | BXH 
| ALPHA3 | BXH 
j ALPHA** | SLL 
| ALPHA5 j SLL 
i x 



|1,2, 20(14) 
j REG1 , REG2 , 2 ( REGD ) 
|REG1,REG2,ZETA 
|REG2,15 
|REG2,0(15) 
.X .. 



Whereas ALPHA1 and ALPHA2 specify ex- 
plicit addresses, ALPHA3 specifies an 
implied address. ALPHA4 is a shift 
instruction shifting the contents of REG2 
left 15 bit positions. ALPHA5 is a shift 
instruction shifting the contents of REG2 
left by the value contained in general 
register 15. 



Name 



f- 



■T T 

| Operation j Operand 



| ALPHA1 


|AP 


|40(9,8),30(6,7) | 


| ALPHA2 


|AP 


|40(NINE,REG8) ,30(L6,7) | 


| ALPHA3 


|AP 


|FIELD2,FIELD1 | 


| ALPHA4 


|AP 


|FIELD2(9) ,FIELD1(6) | 


|BETA 


|AP 


|FIELD2(9) , FIELD 1 | 


| GAMMAl 


|MVC 


|40(9,8),30(7) | 


|GAMMA2 


|MVC 


|40(NINE,REG8) ,DEC(7) | 


| GAMMA3 


|MVC 


|FIELD2,FIELD1 | 


j GAMMA 4 


|MVC 


|FIELD2(9) ,FIELD1 | 


L 







ALPHA1, ALPHA2, GAMMAl, and GAMMA2 spec- 
ify explicit lengths and addresses. ALPHA3 
and GAMMA3 specify both implied length and 
implied addresses. ALPHA4 and GAMMA 4 spec- 
ify explicit length and implied addresses. 
BETA specifies an explicit length for 
FIELD2 and an implied length for FIELDl; 
both addresses are implied. 



SI Format 



r 

| Name 

L 


T 

| Operation 

i _ _ _ 


T 

| Operand 

I — — 


- 1 

1 
_j 


| ALPHA1 


jCLI 


|40(9),XV40' 


— 1 
I 


| ALPHA2 
| BETAl 


|CLI 
|CLI 


|40(REG9) ,TEN 
1 ZETA, TEN 


I 
I 


| BETA2 


jCLI 


IZETA^'A' 


I 



The ALPHA instructions specify explicit 
addresses, whereas the BETA instructions 
specify implied addresses. 



EXTENDED MNEMONIC CODES 



For the convenience of the programmer, 
the assembler provides extended mnemonic 
codes, which allow conditional branches to 
be specified mnemonically as well as 
through the use of the BC machine- 
instruction. These extended mnemonic codes 
specify both the machine branch instruction 
and the condition on which the branch is to 
occur. The codes are not part of the 
universal set of machine-instructions, but 
are translated by the assembler into the 
corresponding operation and condition 
combinations. 
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The allowable extended mnemonic codes 
and their operand formats are shown in 
Figure 4-1, together with their machine- 
instruction equivalents. Unless otherwise 
noted, all extended mnemonics shown are for 
instructions in the RX format. Note that 
the only difference between the operand 
fields of the extended mnemonics and those 
of their ma chine- instruction equivalents is 
the absence of the Rl field and the comma 
that separates it from the rest of the 
operand field. The extended mnemonic list, 
like the machine-instruction list, shows 
explicit address formats only. Each 
address can also be specified as an implied 
address. 
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Extended Code 

B D2(X2,B2) 
BR R2 

NOP D2(X2,B2) 
NOPR R2 



Meaning 

Branch Unconditional 

Branch Unconditional (RR format) 

No Operation 

No Operation (RR format) 



BH 

BL 

BE 

BNH 

BNL 

BNE 



BO 

BP 

BM 

BZ 

BNP 

BNM 

BNZ 



BO 
BM 
BZ 
BNO 



Used After Compare Instructions 

D2(X2,B2) Branch on High 

D2(X2 r B2) Branch on Low 

D2(X2,B2) Branch on Equal 

D2(X2 f B2) Branch on Not High 

D2(X2,,B2) Branch on Not Low 

D2(X2,B2) Branch on Not Equal 

Used After Arithmetic Instructions 

D2(X2 f B2) Branch on Overflow 

D2(X2,B2) Branch on Plus 

D2(X2,B2) Branch on Minus 

D2(X2,B2) Branch on Zero 

D2(X2 f B2) Branch on Not Plus 

D2(X2,B2) Branch on Not Minus 

D2(X2,B2) Branch on Not Zero 

Used After Test Under Mask Instructions 



D2(X2,B2) 
D2(X2, f B2) 
D2(X2,B2) 
D2(X2,B2) 



Branch if Ones 
Branch if Mixed 
Branch if Zeros 
Branch if Not Ones 



Machine-Instruction 

BC 15,D2(X2,B2) 
BCR 15, R2 
BC 0,D2(X2,B2) 
BCR 0,R2 



BC 2,D2(X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2(X2,B2) 
BC 13,D2(X2,B2) 
BC ll f D2(X2 f B2) 
BC 7,D2(X2,B2) 



BC 1,D2(X2,B2) 
BC 2,D2(X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2(X2,B2) 
BC 13,D2(X2,B2) 
BC 11,D2(X2,,B2) 
BC 7,D2(X2,B2) 



BC 1,D2(X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2(X2,B2) 
BC 14,D2(X2,B2) 



Figure 4-1. Extended Mnemonic Codes 



In the following examples, which illus- 
trate the use of extended mnemonics, it is 
to be assumed that the symbol GO is defined 
elsewhere in the program. 



| Operand 



r t 

| Name | Operation 

h + + .] 

|B | 40(3,6) 
|B |40(,6) 
|BL | GO (3) 
J BL | GO 
| BR | 4 
L X. X J 



The first two instructions specify an 
unconditional branch to an explicit 
address. The address in the first case is 
the sum of the contents of base register 6, 
the contents of index register 3, and the 
displacement 40; the address in the second 
instruction is not indexed. The third 
instruction specifies a branch on low to 
the address implied by GO as indexed by the 
contents of index register 3; the fourth 
instruction does not specify an index reg- 
ister. The last instruction is an uncondi- 
tional branch to the address contained in 
register 4. 
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SECTION 5; ASSEMBLER INSTRUCTION STATEMENTS 



Just as machine' instructions are used to 
request the computer to perform a sequence 
of operations during program execution 
time, so assembler instructions are 
requests to the assembler to perform cer- 
tain operations during the assembly. 
Assembler-instruction statements, in 
contrast to machine-instruction statements, 
do not usually cause machine-instructions 
to be included in the assembled program. 
Some, such as DS and DC, generate no 
instructions but do cause storage areas to 
be set aside for constants and other data. 
Others, such as EQU and SPACE, are effec- 
tive only at assembly time; they generate 
nothing in the assembled program and have 
no effect on the location counter. 

The following is a list of assembler 
instructions. 

Symbol Definition Instruction 
EQU - Equate Symbol 

Operation Code Definition Instruction 
OPSYN - Equate Operation Code (Assembler F 
only) 

Data Definition Instructions 

DC - Define Constant 

DS - Define Storage 

CCW - Define Channel Command Word 

* Program Sectioning and Linking Instruc- 
tions 

START - Start Assembly 

CSECT - Identify Control "Section 

CXD - Cumulative Length of External 

Dummy Section (Assembler F only) 
DSECT - Identify Dummy Section 
DXD - i Define External Dummy Section 

(Assembler F only) 
ENTRY - Identify Entry- Point Symbol 
EXTRN - Identify External Symbol 
WXTRN - Identify Weak External Symbol 

(Assembler F only) 
COM - Identify Blank Common Control 

Section 

* B ase Register Instructions 
USING - Use Base Address Register 
DROP - Drop Base Address Register 
Listing Control Instructions 
TITLE - Identify Assembly Output 
EJECT - Start New Page 

SPACE - Space Listing 
PRINT - Print Optional Data 

Program Control Instructions 
ICTL - Input Format Control 
ISEQ - Input Sequence Checking 

* Discussed in Section 3. 



PUNCH - Punch a card 

REPRO - Reproduce Following Card 

ORG - Set Location Counter 

LTORG - Begin Literal Pool 

CNOP - Conditional No Operation 

COPY - Copy Predefined Source Coding 

END - End Assembly 



SYMBOL DEFINITION INSTRUCTION 

EQU — EQUATE SYMBOL 

The EQU instruction is used to define a 
symbol by assigning to it the length, 
value, and relocatability attributes of an 
expression in the operand field. The for- 
mat of the EQU instruction statement is as 
follows : 



j Name 

j A variable 
I symbol or 

ordinary 
J symbol 



j Operation j Operand j 

| EQU | An | 
j j expression | 



The expression in the operand field can 
be absolute or relocatable. Any symbols 
appearing in the expression must be pre- 
viously defined. 

The symbol in the name field is given 
the same length, value, and relocatibility 
attributes as the expression in the operand 
field. The length attribute of the symbol 
is that of the leftmost (or only) term of 
the expression. In the case of EQU to * or 
to a self-defining term, the length attri- 
bute is 1. The value attribute of the 
symbol is the value of the expression. 

The EQU instruction is used to equate 
symbols to register numbers , immediate 
data, or other arbitrary values. The 
following examples illustrate how this can 
be done: 



r t t t 

| Name | Operation | Operand | 

j. + + ^ 

JREG2 | EQU | 2 (general register) | 
|TEST |EQU |X' 3 F' (immediate data) j 

l x J. J 



To reduce programming time, the program- 
mer can equate symbols to frequently used 
expressions and then use the symbols as 
operands in place of the expressions. 
Thus, in the statement: 
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f~ ~TsT " *.~ T~ ~~T } Additional information on use of the OPSYN 

[ Name |0pe«tion lOperand ( instruction is contained in OS Assembler (F) 

I ~ t l~~~ ~i Programmer's Guide . 

| FIELD |EQU | ALPHA- BETA+ GAMMA | 

L X J. J 



FIELD is defined as ALPHA- BET A+ GAMMA and 
may be used in place of it. Note, however, 
that ALPHA, BETA, and GAMMA must all be 
previously defined. If the final result of 
the expression is negative, it is treated 
as if it were positive, i.e., the low-order 
24 bits of the 2's complement is used. 

The assembler assigns a length attribute 
of 1 in an EQU to * statement. 



OPERATION CODE DEFINITION INSTRUCTION 



OPSYN — EQUATE OPERATION CODE (ASSEMBLER F 
ONLY) 

The OPSYN instruction is used to define 
a machine mnemonic or extended mnemonic 
operation code as equivalent to another 
operation code. It is also used to prevent 
the assembler from recognizing an operation 
code. The OPSYN instruction has two for- 
mats: 



j Name 

I 

| Any 

ordinary 

I symbol, 

except an 

assembler 

operation 

I code 



OPSYN 



Operation j Operand j 

1- 1 i 

| A machine xnstruc- | 

I tion mnemonic code,| 

j an extended mnem- | 

I onic code, or an | 

operation code de- i 

fined by a previous i 

OPSYN instruction . 



In this format, the OPSYN instruction 
assigns all the properties of the opera- 
tion code in the operand field to the 
symbol in the name field. The symbol in 
the name field can be a previously defined 
machine or extended mnemonic operation 
code. In this case, the latest definition 
takes precedence. 



r T 

| Name | 

| h . 

| A machine or i 
| extended mnem- i 
I onic operation 
icode j_ 



Operation j 
h 

OPSYN | 



Operand j 



Blank 



In this, format, the OPSYN instruction 
prevents the assembler from recognizing 
the operation code in the name field. 



Only ICTL and OPSYN instructions may precede 
an OPSYN instruction. 



DATA DEFINITION INSTRUCTIONS 



There are three data definition instruc- 
tion statements : Define Constant (DC) , 
Define Storage (DS), and Define Channel 
Command Word (CCW). 



These statements are used to enter 
data constants into storage, to define 
and reserve areas of storage, and to 
specify the contents of channel command 
words. The statements can be named by 
symbols so that other program statements 
can refer to the generated fields . The 
DC instruction is presented first and 
discussed in 'more detail than the DS 
instruction because the DS instruction 
is written in the same format as the 
DC instruction and can specify some or 
all of the information that the DC in- 
struction provides . Only the function 
and treatment of the statements vary. 



DC — DEFINE CONSTANT 



The DC instruction is used to provide 
<aonstant data in storage. It can specify 
one constant or a series of constants. 
A variety of constants can be specified: 
fixed-point, floating-point, decimal, 
hexadecimal, character, and storage 
addresses. (Data constants are generally 
called constants unless they are created 
from storage addresses , in which case 
they are called address constants . ) 
The format of the DC instruction state- 
ment is as follows: 



JName 




| Operation 


| Operand 


l~ 




-+ 


-+ 


r 




1 Any 


sym- 


|DC 


|One or more 


{ bol 


or 




| operands in 


| blank 




| the format 


1 






j described 


V 
1 
1 






| below, each 
j separated by 
| a comma 
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Each operand consists of four subfields: 
the first three describe the constant, and 
the fourth subfield provides the nominal 
value (s) for the constant (s). The first 
and third subfields can be omitted, but the 
second and fourth must be specified. Note 
that nominal value (s) for more than one 
constant can be specified in the fourth 
subfield for most types of constants. Each 
constant so specified must be of the same 
type; the descriptive subfields that precede 
the nominal value apply to all of them. 
No blanks can occur within any of the sub- 
fields (unless provided as characters in a 
character constant or a character self- 
defining term) , nor can they occur between 
the subfields of an operand. Similarly, 
blanks cannot occur between operands and 
the commas that separate them when multiple 
operands are being specified. 

The subfields of each DC operand are 
written in the following sequence: 



1 2 
Dupli- Type 
cation 
Factor 



3 4 

Modifiers Nominal Value (s) 



Although the constants specified within 
one operand must have the same character- 
istics, each operand can specify a different 
type of constant. For example, in a DC 
instruction with three operands, the first 
operand might specify four decimal con- 
stants , the second a floating-point con- 
stant, and the third a character constant. 

The symbol that names the DC instruction 
is the name of the constant (or first 
constant if the instruction specifies more 
than one). Relative addressing (e.g., 
SYMBOL+2) can be used to address the var- 
ious constants if more than one has been 
specified, because the number of bytes 
allocated to each constant can be deter- 
mined. 

The value attribute of the symbol naming 
the DC instruction is the address of the 
leftmost byte (after alignment) of the 
first, or only,, constant. The length 
attribute depends on two things: the type 
of constant being defined and the presence 
of a length specification. Implied lengths 
are assumed for the various constant types 
in the absence of a length specification. 
If more than one constant is defined, the 
length attribute is the length in bytes 
(specified or implied) of the first con- 
stant. 



Some constant types are only aligned to a 
byte boundary, but the DS instruction can 
be used to force any type of word boundary 
alignment for them. This is explained 
under "DS — Define Storage. " Other con- 
stants are aligned at various word boundar- 
ies (half, full, or double) in the absence 
of a length specification. If length is 
specified, no boundary alignment occurs for 
such constants. 

Bytes that must be skipped in order to 
align the field at the proper boundary are 
not considered to be part of the constant. 
In other words, the location counter is 
incremented to reflect the proper boundary 
(if any incrementing is necessary) before 
the address value is established. Thus, 
the symbol naming the constant will not 
receive a value attribute that is the 
location of a skipped byte. 

Any bytes skipped in aligning statements 
that do not cause information to be assem- 
bled are not zeroed. Bytes skipped to 
align a DC statement are zeroed; bytes 
skipped to align a DS statement are not 
zeroed. 

Appendix F summarizes, in chart form, 
the information concerning constants that 
is presented in this section. 



LITERAL DEFINITIONS: The reader is remind- 
ed that the discussion of literals as 
machine-instruction operands (in Section 2) 
referred him to the description of the DC 
operand for the method of writing a literal 
operand. All subsequent operand specifi- 
cations are applicable to writing literals, 
the only differences being: 

1. The literal is preceded by an equal 
sign. 

2. Multiple operands may not be speci- 
fied. 

3. Unsigned decimal self-defining terms 
must be used to express the duplica- 
tion factor and length modifier 
values. 

4. The duplication factor may not be 
zero. 

5. S-type address constants may not be 
specified. 

6. Signed or unsigned decimal self- 
defining terms must be used to express 
scale and exponent modifiers. 

7. Q-type address constants may not be 
specified in literals. 



Boundary alignment also varies according 
to the type of constant being specified and 
the presence of a length specification. 



Examples of literals appear throughout 
the balance of the DC instruction 
discussion. 
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Code 


Type of Constant 


Machine Format 


C 


Character 


8-bit code for each character 


X 


Hexadecimal 


4-bit code for each hexadecimal digit 


B 


Binary 


binary format 


F 


Fixed-point 


Signed, fixed-point binary format; normally a full word 


H 


Fixed-point 


Signed, fixed-point binary format; normally a half word 


E 


Floating-point 


Short floating-point format; normally a full word 


D 


Floating-point 


Long floating-point format; normally a double word 


L 


Floating-point 


Extended floating-point format; normally two double words 
(Assembler F only) 


P 


Decimal 


Packed decimal format 


Z 


Decimal 


Zoned decimal format 


A 


Address 


Value of address; normally a full word 


Y 


Address 


Value of address; normally a half word 


S 


Address 


Base register and displacement value; a half word 


V 


Address 


Space reserved for external symbol addresses; each address 
normally a full word 


Q 


Address 


Space reserved for dummy section offset 






(Assembler F only) 



Figure 5-1. Type Codes for Constants 



Operand Subfield 1; Duplication Factor 



Operand Subfield 2; Type 



The duplication factor may be omitted. 
If specified, it causes the constant (s) to 
be generated the number of times indicated 
by the factor. The factor may be specified 
either by an unsigned decimal self-defining 
term or by a positive absolute expression 
that is enclosed by parentheses. The 
duplication factor is applied after the 
constant is assembled. All symbols in the 
expression must be previously defined. 

Note that a duplication factor of zero 
is permitted except in a literal and 
achieves the same result as it would in a 
DS instruction. A DC instruction with a 
zero duplication factor will not produce 
control dictionary entries. See "Forcing 
Alignment" under "DS — Define Storage." 



Note; If duplication is specified for an 
address constant containing a location 
counter reference, the value of the loca- 
tion counter used in each duplication is 
incremented by the length of the operand. 



The type subfield defines the type of 
constant being specified. From the type 
specification, the assembler determines how 
it is to interpret the constant and trans- 
late it into the appropriate machine for- 
mat. The type is specified by a single- 
letter code as shown in Figure 5-1. 

Further information about these 
constants is provided in the discussion of 
the constants themselves under "Operand 
Subfield 4: Constant." 



Operand Subfield 3: Modifiers 



Modifiers describe the length in bytes 
desired for a constant (in contrast to an 
implied length) , and the scaling and expo- 
nent for the constant. If multiple modifi- 
ers are written, they must appear in this 
sequence: length, scale, exponent. Each is 
written and used as described in the fol- 
lowing text. 
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LENGTH MODIFIER; This is written as Ln, 
where n is either an unsigned decimal self- 
defining term or a positive absolute ex- 
pression enclosed by parentheses. Any 
symbols in the expression must be previously 
defined. The value of n represents the 
number of bytes of storage that are assem- 
bled for the constant. The maximum value 
permitted for the length modifiers supplied 
for the various types of constants is sum- 
marized in Appendix F. This table also 
indicates the implied length for each type 
of constant; the implied length is used 
unless a length modifier is present. A 
length modifier may be specified for any 
type of constant. However, no boundary 
alignment will be provided when a length 
modifier is given. 



Use of a length modifier may cause 
truncation. For example, 

DC C'ABCDXYZ' 

will generate a 7-byte constant, whereas 

DC CL6'ABCDXYZ' 

will generate a 6-byte constant and cause 
Z to be lost. Truncation of C, X, B, Z, 
A, Y, and P constants is not flagged as 
an error. However, F, H f E f D, and L 
constants will be flagged if significant 
bits are lost. Finally, each type of 
constant has an imposed or natural length 
modifier range limit. Appendix F shows 
which constants can be flagged for trunca- 
tion of significant digits. It also shows 
the allowable length modifier range for 
each constant. 



cated to fit the field. If the assembled 
length does not leave the location counter 
set at a byte boundary, and another bit 
length constant does not immediately follow 
in the same statement, the remainder of the 
last byte used is filled with zeros. This 
leaves the location counter set at the next 
byte boundary. Figure 5-2 shows a fixed- 
point constant with a specified bit-length 
of 13, as coded, and as it would appear in 
storage. Note that the constant has been 
padded on the left to bring it to its 
designated 13-bit length. 

As coded : 



, j ) 

Name I Operation [ Operand 



BLCON i DC 
I l 



I FL.13'579 



In storage: 
byte byte 
padding 



byte 



0001001000011000 

— y— •/* y ./V— y / 

579 fill 



Figure 5-2. Bit-Length Specification 
(Single Constant) 



The implied length of BLCON is two 
bytes. A reference to BLCON would cause 
the entire two bytes to be referenced. 



Bit-Length Specification: The length of a 
constant, in bits, is specified by L.n, 
where n is specified as stated above and 
represents the number of bits in storage 
into which the constant is to be assembled. 
The value of n may exceed eight and is 
interpreted to mean an integral number of 
bytes plus so many bits. For example, L.20 
is interpreted as a length of two bytes 
plus four bits. 

Assembly of the first or only constant 
with bit-length specification starts on a 
byte boundary. The constant is placed in 
the high or low order end of the field 
depending on the type of constant being 
specified. The constant is padded or trun- 



When bit-length specification is used 
in association with multiple constants 
(see Operand Subfield 4: Constant 
following) , each succeeding constant in 
the list is assembled starting at the 
next available bit. Figure 5-3 illustrates 
this. 



As coded: 
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In storage: 

byte byte 



byte byte 



byte 



padding 



padding 



padding 



aoioiooopioooooiloioiooooliiiooioo 

^ /v. 



161 



Figure 5-3, 



21 



57 



fill 



Bit-Length Specification 
(Multiple Constants) 



The symbol used as a name entry in a DC 
assembler instruction takes on the length 
attribute of the first constant in the 
list; therefore the implied length of 
BLMCON in Figure 5-3 is two bytes. 



If duplication is specified, filling 
occurs once at the end of the field occu- 
pied by the duplicated constant (s). 

Whe.n bit-length specification is used in 
association with multiple operands, assem- 
bly of the constant (s) in each succeeding 
operand starts at the next available bi,t. 
Figure 5-4 illustrates this. 

As coded: 



[ ' 

{ ! Oper- 

igame j_ation 


"I 

• 

Operand ' 


[BLMOCON ! DC 


FL.?^' ^L.IO'AB' 


/ XL.14 , C4»! 




byte byte 
padding 



byte 



00010011100000111000000110001000 

( fi 



A 



C4 



11 



A plus 
first two 
bits of B 

Figure 5-4. Bit-Length Specification 
(Multiple Operands) 



In Figure 5-4, three different types of 
constants have been specified, one to an 
operand. Note that the character constant 
* AB' which normally would occupy 16 bits is 
truncated on the right to fit the 10-bit 
field designated. Note that filling occurs 
only at the end of the field occupied by 
all the constants. 



Scale Modifier : This modifier is written 
as Sn, where n is either a decimal value or 
an absolute expression enclosed by paren- 
theses. All symbols in the expression must 
be previously defined. The decimal self- 
defining term or the parenthesized expres- 
sion may be preceded by a sign; if none 
is present, a plus sign is assumed. The 
maximum values for scale modifiers are 
summarized in Appendix F. 

A scale modifier may be used with fixed- 
point IF, H) and floating-point (E,D f L) 
constants only. It is used to specify the 

amount of internal scaling that is desired, 
as follows : 

Scale Modifier for Fixed-Point Constants: 
the scale modifier specifies the power of 
two by which the constant must be 
multiplied after it has been converted to 
its binary representation. Just as multi- 
plication of a decimal number by a power 
of 10 causes the decimal point to move, 
multiplication of a binary number by a 
power of two causes the binary point to 
move. This multiplication has the effect 
of moving the binary point away from its 
assumed position in the binary field; the 
assumed position being to the right of the 
rightmost position. 

Thus, the scale modifier indicates 
either of the following: (1) the number of 
binary positions to be occupied by the 
fractional portion of the binary number, 
or (2) the number of binary positions to 
be deleted from the integral portion of 
the binary number. A positive scale of x 
shifts the integral portion of the number 
x binary positions to the left, thereby 
reserving the rightmost x binary positions 
for the fractional portion. A negative 
scale shifts the integral portion of the 
number right, thereby deleting rightmost 
integral positions. If a scale modifier 
does not accompany a fixed- point constant 
containing a fractional part, the fraction- 
al part is lost. 

In all cases where positions are lost 
because of scaling (or the lack of 
scaling), rounding occurs in the leftmost 
bit of the lost portion. The rounding is 
reflected in the rightmost position saved. 

Scale Modifier for Floating-Point Con- 
stants: Only a positive scale modifier may 
be used with a floating-point constant. It 
indicates the number of hexadecimal posi- 
tions that the fraction is to be shifted to 
the right. Note that this shift amount is 
in terms of hexadecimal positions, each of 
which is four binary positions. (A posi- 
tive scaling actually indicates that the 
point is to be moved to the left. However, 
a floating-point constant is always con- 
verted to a fraction, which is hexadeci- 
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mally normalized. The point is assumed to 
be at the left of the leftmost position in 
the field. Since the point cannot be moved 
left, the fraction is shifted right.) 

Thus, scaling that is specified for a 
floating-point constant provides an assem- 
bled fraction that is unnormalized, i.e., 
contains hexadecimal zeros in the leftmost 
positions of the fraction. When the frac- 
tion is shifted, the exponent is adjusted 
accordingly to retain the correct magni- 
tude. When hexadecimal positions are lost, 
rounding occurs in the leftmost hexadecimal 
position of the lost portion. The rounding 
is reflected in the rightmost hexadecimal 
position saved. 



EXPONENT MODIFIER: 



This modifier is writ- 

where n is either a decimal 

absolute expres- 

Any symbols 



ten as En, 

self-defining term or an 

sion enclosed by parentheses. 



in the expression must be previously 
defined. The decimal value or the paren- 
thesized expression may be preceded by a 
sign; if none is present, a plus sign is 
assumed. 



An exponent modifier may be used with 
fixed-point (F, H) and floating-point 
(E,D,L) constants only. The modifier 
denotes the power of 10 by which the 
constant is to be multiplied before its 
conversion to the proper internal format. 

This modifier is not to be confused with 
the exponent of the constant itself, which 
is specified as part of the constant and is 
explained under "Operand Subfield 4: Con- 
stant." The exponent modifier affects each 
constant in the operand, whereas the expo- 
nent written as part of the constant only 
pertains to that constant. Thus, a con- 
stant may be specified with an exponent of 
+2, and an exponent modifier of +5 may 
precede the constant. In effect, the con- 
stant has an exponent of +7. 

The range for the exponent modifier is 
-85 through +75. However, if there is an 
exponent in the constant itself (see "Float- 
ing-Point Constants — E, D, and L" under 
"Operand Subfield 4: Constant") the sum of 
that exponent and the exponent modifier 
must be within the range -85 - +75. Thus, 
an exponent modifier of -40 together with 
an exponent of -47 would not be permitted. 



One further limitation is that the value 
specified must be contained in the 
implied length of the constant. Refer 
to "Floating Point Arithmetic" in 
IBM System/360 Principles of Operation . 



Operand Subfield 4: Constant 

This subfield supplies the constant (or 
constants) described by the subfields that 
precede it. A data constant (any type 
except A, Y, S, Q and V) is enclosed by 
apostrophes. An address constant (type A, 
Y, S, Q, or V) is enclosed by parentheses. 
To specify two or more constants in the 
subfield, the constants must be separated 
by commas and the entire sequence of con- 
stants must be enclosed by the appropriate 
delimiters (i.e., apostrophes or 
parentheses) . Thus, the format for speci- 
fying the constant (s) is one of the follow- 
ing: 



Single 
Constant 
•constant' 
(constant) 



Multiple 
Constants* 
• constant, . 
(constant, . 



. , constant * 
. , constant) 



* Not permitted for character, hexadecimal, 
and binary constants. 

All constant types except character (C) , 
hexadecimal (X), binary (B) , packed decimal 
(P) , and zoned decimal (Z) , are aligned on 
the proper boundary, as shown in Appendix 
F, unless a length modifier is specified. 
In the presence of a length modifier, no 
boundary alignment is performed. If an 
operand specifies more than one constant, 
any necessary alignment applies to the 
first constant only. Thus, for an operand 
that provides five full-word constants, the 
first would be aligned on a full-word 
boundary, and the rest would automatically 
fall on full-word boundaries. 

The total storage requirement of an 
operand is the product of the length times 
the number of constants in the operand 
times the duplication factor (if present) 
plus any bytes skipped for boundary align- 
ment of the first constant. If more than 
one operand is present, the storage 
requirement is derived by summing the 
requirements for each operand. 
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If an address constant contains a loca- 
tion counter reference, the location count- 
er value that is used is the storage 
address of the first byte the constant will 
occupy. Thus, if several address constants 
in the same instruction refer to the loca- 
tion counter, the value of the location 
counter varies from constant to constant. 
Similarly, if a single constant is speci- 
fied (and it is a location counter 
reference) with a duplication factor, the 
constant is duplicated with a varying loca- 
tion counter value. 



However,, in this next example, the 
length attribute is 15, and three blanks 
appear in storage to the right of the zero: 

r t t 1 

(Name | Operation | Operand | 

f .__ + ___x ^ 

j FIELD J DC |CL15' TOTAL IS 110' j 
L X X _J 

In the next example, the length attri- 
bute of FIELD is 12, although 13 characters 
appear in the operand. The two ampersands 
count as only one byte. 



The following text describes each of the 
constant types and provides examples. 



Character Constant — C: Any of the valid 
256 punch combinations can be designated in 
a character constant. Only one character 
constant can be specified per operand. 
Since multiple constants within an operand 
are separated by commas, an attempt to 
specify two character constants results 
in interpreting the comma separating them 
as a character. 



Special consideration must be given to 
representing apostrophes and ampersands as 
characters. Each single apostrophe or 
ampersand desired as a character in the 
constant must be represented by a pair of 
apostrophes or ampersands. Only one apos- 
trophe or ampersand appears in storage. 

The maximum length of a character con- 
stant is 256 bytes. No boundary alignment 
is performed. Each character is translated 
into one byte. Double apostrophes or dou- 
ble ampersands count as one character. If 
no length modifier is given, the size in 
bytes of the character constant is equal to 
the number of characters in the constant. 
If a length modifier is provided, the 
result varies as follows: 

1. If the number of characters in the 
constant exceeds the specified length, 
as many rightmost bytes and/or bits as 
necessary are dropped. 

2. If the number of characters is less 
than the specified length, the excess 
rightmost bytes and/or bits are filled 
with blanks. 

In the following example, the length 
attribute of FIELD is 12: 



r t t 1 

| Name | Operation | Operand | 

|. 1 x ., 

| FIELD jDC j C TOTAL IS 110' j 

L X X J 



r t t 1 

I Name | Operation j Operand | 
j. x x 1 

j FIELD | DC j C 'TOTAL IS €610' j 

II | I 
L X X J 

Note that in the next example, a length 
of four has been specified, but there are 
five characters in the constant. 

r T T ^ 

| Name | Operation | Operand | 

H x x i 

j FIELD j DC |3CL4' ABCDE' | 

L X X J 



The generated constant would be: 

ABCDABCDABCD 

On the other hand, if the length had 
been specified as six instead of four, the 
generated constant would have been: 

ABCDE ABCDE ABCDE 

Note that the same constant could be 
specified as a literal. 

r t~ t 1 

| Name | Operation | Operand | 

j. x x ^ 

j |MVC |AREM12) , =3CL4 'ABCDE ' | 

L X X J 



Hexadecimal Constant — X: A hexadecimal 
constant consists of one or more of the 
hexadecimal digits, which are 0-9 and A-F. 
Only one hexadecimal constant can be speci- 
fied per operand. The maximum length of a 
hexadecimal constant is 256 bytes or 512 
hexadecimal digits when specified using an 
explicit length attribute (for example, 
HEX DC XL256'FF'). However, due to the 
assembler's syntax restriction allowing 
only two continuation lines per input state- 
ment, the maximum length of an implicitly 
specified hexadecimal operand (X'FFFFFF', 
etc.) is 176 digits when normal statement 
boundaries are used. 

Constants that contain an even number of 
hexadecimal digits are translated as one 
byte per pair of digits. If an odd number 
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of digits is specified,, the leftmost byte 
has the leftmost four bits filled with a 
hexadecimal zero, while the rightmost four 
bits contain the odd (first) digit. No 
boundary alignment is performed. 

If no length modifier is given, the 
implied length of the constant is half the 
number of hexadecimal digits in the con- 
stant (assuming that a hexadecimal zero is 
added to an odd number of digits) . If a 
length modifier is given, the constant is 
handled as follows: 



1. If the number of hexadecimal digit 
pairs exceeds the specified length, 
the necessary leftmost bits (and/or 
bytes) are dropped. 

2. If the number of hexadecimal digit 
pairs is less than the specified 
length, the necessary bits (and/or 
bytes) are added to the left and 
filled with hexadecimal zeros. 

An eight-digit hexadecimal constant pro- 
vides a convenient way to set the bit 
pattern of a full binary word. The con- 
stant in the following example would set 
the first and third bytes of a word to l's: 



r t t 1 

| Name | Operation | Operand | 

j. + + ., 

I IDS | OF | 

| TEST j DC JX'FFOOFFOO' | 

L x J. . j 



The resulting constant is 6F4E, which 
occupies the specified two bytes. It is 
duplicated three times , as requested by 
the duplication factor. If it had merely 
been specified as X'A6F4E', the resulting 
constant would have a hexadecimal zero in 
the leftmost position. 

0A6F4E0A6F4E0A6F4E 

Binary Constant — B: A binary constant is 
written using l's and O's enclosed in apos- 
trophes. Only one binary constant can be 
specified in an operand. Duplication and 
length can be specified. The maximum 
length of a binary constant is 256 bytes. 

The implied length of a binary constant 
is the number of bytes occupied by the 
constant including any padding necessary. 
Padding or truncation takes place on the 
left. The padding bit used is a 0. 

The following example shows the coding 
used to designate a binary constant. BCON 
would have a length attribute of 1. 



r t t 1 

| Name | Operation | Operand | 

,. _ x + ., 

JBCON JDC IB'IIOIIIOI* j 

JBTRUNC |DC | Bid. ■■■ 100100011 f | 
JBPAD | DC JBLl'lOl' | 

L J X J 



BTRUNC would assemble with the 
bit truncated, as follows: 



leftmost 



The DS instruction sets the location 
counter to a full word-boundary. (See 
DS — Define Symbol. ) 

The next example uses a hexadecimal 
constant as a literal and inserts l's into 
bits 24 through 31 of register 5. 



r t t 1 

| Name | Operation | Operand | 

j. + + :, 

j JIC IS^X'FF* | 

L X X J 



00100011 

BPAD would assemble with five zeros as 
padding, as follows: 

00000101 

Fixed-Point Constants — F and H: A fixed- 
point constant is written as a decimal 
number, which can be followed by a decimal 
exponent if desired. The number can be an 
integer, . a fraction,, or a mixed number 
(i.e.,, one with integral and fractional 
portions) . The format of the constant is 
as follows: 



In the following example , the digit A 
is dropped, because five hexadecimal 
digits are specified for a length of two 
bytes : 

r t t 1 

| Name | Operation | Operand | 

|. + x 1 

JALPHACON | DC | 3XL2 ' A6F4E » j 

I I I I 

L X i . J 



1. The number is written as a signed or 
unsigned decimal value. The decimal 

point can be placed before, within, or 
after the number. If it is omitted, 
the number is assumed to be an integer, 
A positive sign is assumed if an un- 
signed number is specified. Unless a 
scale modifier accompanies a mixed 
number or fraction, the fractional 
portion is lost, as explained under 
Subfield 3: Modifiers . 
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2. The exponent is optional. If speci- 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal self- 
defining term specifying the exponent 
of the factor 10. The exponent may be 
in the range -85 to +75. If an 
unsigned exponent is specified, a plus 
sign is assumed. The exponent causes 
the value of the constant to be 
adjusted by the power of 10 that it 
specifies before the constant is con- 
verted to its binary form. The expo- 
nent may exceed the permissible range 
for exponents, provided that the sum 
of the exponent and the exponent modi- 
fier does not exceed that range. 



The number is converted to a binary 
number, and scaling is performed if speci- 
fied. The binary number is then rounded 
and assembled into the proper field, 
according to the specified or implied 
length. The resulting number will not 
differ from the exact value by more than 
one in the last place. If the value of the 
number exceeds the length specified or 
implied, the sign is lost, the necessary 
leftmost bits are truncated to the length 
of the field, and the value is then assem- 
bled into the whole field. Any duplication 
factor that is present is applied after the 
constant is assembled. A negative number 
is carried in 2's complement form. 



stant. The expression CONWRD+4 could be 
used to address the second constant (second 
word) in the field. 

r t t 1 

| Name | Operation (Operand j 

j. + + H 

JCONWRD JDC |3F*65847V j 

L x A j 

The next statement cause's the generation 
of a two- byte field containing a negative 
constant. Notice that scaling has been 
specified in order to reserve six bits for 
the fractional portion of the constant. 

r T t 1 

| Name [Operation | Operand | 

i_ a a ., 

|HALFCON j DC |HS6 , -25.46' j 

I A ; A . -J 

The next constant (3.50) is multiplied 
by 10 to the power -2 before being con- 
verted to its binary format. The scale 
modifier reserves 12 bits for the 
fractional portion. 

r t — t ■ — 1 

| Name (Operation | Operand | 

|. - + a A 

JFULLCON j DC j HS12' 3 . 50E-2' | 

l x x j 



The same constant could be specified 
a literal: 



as 



An implied length of four bytes is 
assumed for a full- word (F) and two bytes 
for a half-word (H) , and the constant is 
aligned to the proper full-word or half- 
word if a length is not specified. 
However, any length up to and including 
eight bytes can be specified for either 
type of constant by a length modifier, in 
which case no boundary alignment occurs. 



Maximum and minimum values, exclusive of 
scaling, for fixed- point constants are: 



r t t 1 

| Name | Operation | Operand | 

j. A A _ H 

| |AH |7,=HS12'3.50E-2* | 
l A A ___J 



The final example specifies three con- 
stants. Notice that the scale modifier 
requests four bits for the fractional por- 
tion of each constant. The four bits are 
provided whether or not the fraction 
exists. 



Length 


Max 


Min 


8 


2 6 3-l 


-2 63 


4 


2 31-1 


-2 31 


2 


2 15 -1 


-2 i5 


1 


2 7 -l 


-2 7 


.4 


2 3 -1 


-2 3 


.2 


2 1 -1 


-2 1 


.1 





-1 



A field of three full-words is generated 
from the statement shown below. The loca- 
tion attribute of CONWRD is the address of 
the leftmost byte of the first word, and 
the length attribute is 4, the implied 
length for a full-word fixed^point con- 



r t t 1 

| Name | Operation | Operand | 

J. A -A -j 

JTHREECON JDC j FS4' 10 , 25. 3, 100 ' j 

l A A J 



Floating-Point Constants -.- E, D, and L: A 
floating-point constant is written as a 
decimal number. As an option a decimal 
exponent may follow. The number may be an 
integer, a fraction, or a mixed number 
(i.e., one with integral and fractional 
portions) . The format of the constant is 
as follows : 
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SHORT FLOATING POINT NUMBER (E) 



s 


7 BIT 
CHARAC- 
TERISTIC 





7 8 

LONG FLOATING POINT NUMBER (D) 



S 


7 BIT 
CHARAC- 
TERISTIC 


56-BIT FRACTION 


7 8 
EXTENDED FLOATING POINT NUMBER (L) 




63 


S 


7 BIT 
CHARAC- 
TERISTIC 


HIGH ORDER HALF OF 
112 BIT FRACTION 


7 8 




63 




LOW ORDER HALF OF 
112 BIT FRACTION 



Figure 5-5. Floating-Point External Formats 



The number is written as a signed or 
unsigned decimal value. The decimal 
point can be placed before, within, or 
after the number. If it is omitted, 
the number is assumed to be an integer, 
A positive sign is assumed if an un- 
signed number is specified. 



2. The exponent is optional. If speci- 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal value speci- 
fying the exponent of the factor 10. 
If an unsigned- exponent is specified, 
a plus sign is assumed. The range of 
the' exponent is explained under 
"Exponent Modifier" above. 



The external format for a floating-point 
number has two parts: the portion contain- 
ing the exponent, which is sometimes called 
the characteristic, followed by the portion 
containing the fraction, which is sometimes 
called the mantissa. Therefore, the number 
specified as a floating-point constant must 
be converted to a fraction before it can be 
translated into the proper format. Figure 
5-5 shows the external format of the three 
types of floating-point constants. 

The type L constant resembles two 
contiguous type D constants . In the type 
L constant the sign of the second double 
word is the same as the sign of the first. 
The characteristic of the second double 
word is equal to the characteristic of the 



first minus 14, modulo 128. For informa- 
tion on use of the type L constant see the 
OS Assembler (F) Programmer's Guide . 

For example, the constant 27.35E2 repre- 
sents the number 27.35 times 10 to the 2nd. 
Represented as a fraction, it would be 
.2735 times 10 to the 4th, the exponent 
having been modified to reflect the shift- 
ing of the decimal point. The exponent may 
also be affected by the presence of an 
exponent modifier, as explained under 
"Operand Subfield 3: Modifiers." Thus, the 
exponent is also altered before being 
translated into machine format. 

In machine format a floating-point number 
also has two parts, the signed exponent and 
signed fraction. The quantity expressed by 
this number is the product of the fraction 
and the number 16 raised to the power of 
the exponent. 

The exponent is translated into its binary 
equivalent in excess 64 binary notation and 
the fraction is converted to a binary num- 
ber. Scaling is performed if specified; 
if not, the fraction is normalized (leading 
hexadecimal zeros are removed) . Rounding of 
the fraction is then performed according to 
the specified or implied length, and the 
number is stored in the proper field. The 
resulting number will not differ from the 
exact value by more than one in the last 
place. Within the portion of the floating- 
point field allocated to the fraction, the 
hexadecimal point is assumed to be to the 
left of the leftmost hexadecimal digit, and 
the fraction occupies the leftmost portion 
of the field. Negative fractions are 
carried in true representation, not in the 
twos complement form. 
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An implied length of four bytes is 
assumed for a short (E) constant and eight 
bytes for a long (D) constant. An implied 
length of 16 bytes is assumed for an 
extended (L) constant. The constant is 
aligned at the proper word (E) or double 
word (D and L) boundary if a length is 
not specified. However, any length up 
to and including eight bytes (E and D) or 
16 bytes (L) can be specified by a length 
modifier. In this case, no boundary 
alignment occurs . 

Any of the following statements could be 
used to specify 46.415 as a positive, 
full-word, floating-point constant; the 
last is a machine-instruction statement 
with a literal operand. Note that the last 
two constants contain an exponent modifier. 



If zoned decimal format is specified 
(Z) , each decimal digit is translated into 
one byte. The translation is done accord- 
ing to the character set shown in Appendix 
A. The rightmost byte contains the sign as 
well as the rightmost digit. For packed 
decimal format (P) , each pair of decimal 
digits is translated into one byte. The 
rightmost digit and the sign are translated 
into the rightmost byte. The bit configu- 
ration for the digits is identical to the 
configurations for the hexadecimal digits 
0-9 as shown in Section 3 under 
"Hexadecimal Self-Defining Value." For 
both packed and. zoned decimals, a plus sign 
is translated into the hexadecimal digit c, 
and a minus sign into the digit D. 
The packed decimal constants (P-type) 
are used for processing by the decimal 
instruction set. 









T 


|Name 


| Operation 


| Operand 


| 




















|DC 


|E'46.415' 


| 




|DC 


|E*46415E-3' 


| 




|DC 


|E , +464.15E-1' 


| 




|DC 


|E , +.46415E+2' 


| 




|DC 


|EE2' .46415' 


| 




|AE 


|6,=EE2 , .46415' 


| 











The following would each be generated as 
double-word floating-point constants. 

r T~ t 1 

| Name | Operation | Operand | 

j. + + ., 

|FLOAT |DC |DE+4'+46,-3.729,+473' J 
L — x X j 

Decimal Constants — P and Z : A decimal 
constant is written as a signed or unsigned 
decimal value. If the sign is omitted, a 
plus sign is assumed. The decimal point 
may be written wherever desired or may be 
omitted. Scaling and exponent modifiers 
may not be specified for decimal constants. 
The maximum length of a decimal constant is 
16 bytes. No word boundary alignment is 
performed. 

The placement of a decimal point in the 
definition does not affect the assembly of 
the constant in any way, because, unlike 
fixed-point and floating-point constants, a 
decimal constant is not converted to its 
binary equivalent. The fact that a decimal 
constant is an integer, a fraction, or a 
mixed number is not pertinent to its gener- 
ation. Furthermore, the decimal point is 
not assembled into the constant. The pro- 
grammer may determine proper decimal point 
alignment either by defining his data so 
that the point is aligned or by selecting 
machine- instructions that will operate on 
the data properly (i.e., shift it for 
purposes of alignment) . 



If an even number of packed decimal 
digits is specified, one digit will be left 
unpaired because the rightmost digit is 
paired with the sign. Therefore, in the 
leftmost byte, the leftmost four bits will 
be set to zeros and the rightmost four bits 
will contain the odd (first) digit. 

If no length modifier is given, the 
implied length for either constant is the 
number of bytes the constant occupies 
(taking into account the format, sign, and 
possible addition of zero bits for packed 
decimals) . If a length modifier is given, 
the constant is handled as follows: 



1. 



If the constant requires fewer bytes 
than the length specifies, the neces- 
sary number of bytes is added to the 
left. For zoned decimal format, the 
decimal digit zero is placed in each 
added byte. For packed decimals, the 
bits of each added byte are set to 
zero. 



2. 



If the constant requires more bytes 
than the length specifies,, the neces- 
sary number of leftmost digits or 
pairs of digits is dropped, depending 
on which format is specified. 
Examples of decimal constant definitions 
follow. 



r t t 

| Name | Operation | Operand 



|DC 


^•+1.25' 


|DC 


|Z'-543' 


|DC 


\zn9.6B* 


IDC 


|PL3'79.68' 


X 


X 



The following statement specifies both 
packed and zoned decimal constants. The 
length modifier applies to each constant in 
the first operand (i.e., to each packed 
decimal constant). Note that a literal 
could not specify both operands. 
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r t tt 1 

| Name | Operation | Operand | 

j. + + _ ., 

JDECIMALS |DC | PL8* + 25. 8, -3874, j 
| | |+2.3 , ,Z , +80,-3.72' | 
L j. x j 



The last example illustrates the use of 
a packed decimal literal. 



r t t n 

| Name | Operation | Operand | 

,. x + H 

| JONPK |OUTAREA,=PL2*+25' | 
i X JL J 



Address Constants : An address constant is 
a storage address that is translated into a 
constant. Address constants can be used 
for initializing base registers to facili- 
tate the addressing of storage. Further- 
more, they provide a means of communicating 
between control sections of a multisection 
program. However, storage addressing and 
control section communication are also 
dependent on the use of the USING assembler 
instruction and the loading of registers. 
Coding examples that illustrate these con- 
siderations are provided in Section 3 using 
"Programming with the USING Instruction." 



An address constant, unlike. other types 
of constants, is enclosed in parentheses. 
If two or more address constants are speci- 
fied in an operand, they are separated by 
commas, and the entire sequence is enclosed 
by parentheses. There are five types of 
address constants: A, Y, S, Q and V. A 
relocatable address constant may not be 
specified with bit lengths. 



Complex Relocatable Expressions: A complex 
relocatable expression can only be used to 
specify an A-type or Y-type address con- 
stant. These expressions contain two or 
more unpaired relocatable terms and/or 
negative relocatable terms in addition to 
any absolute or paired relocatable terms 
that may be present. A complex relocatable 
expression might consist of external sym- 
bols and designate an address in an inde- 
pendent assembly that is to be linked and 
loaded with the assembly containing the 
address constant. 



A-Type Address Constant: This constant is 
specified as an absolute, relocatable, or 
complex relocatable expression. (Remember 
that an expression may be single term or 
multiterm.) The value of the expression is 
calculated to 32 bits as explained in 
Section 2 with one exception: the maximum 



value of the expression may be 2 31 -1. The 
value is then truncated on the left, if 
necessary, to the specified or implied 
length of the field and assembled into the 
rightmost bits of the field. The implied 
length of an A-type constant is four bytes, 
and alignment is to a full-word boundary 
unless a length is specified, in which case 
no alignment will occur. The length that 
may be specified depends on the type of 
expression used for the constant; a length 
of .1 to 4 bytes may be used for an 
absolute expression, while a length of only 
3 or 4 may be used for a relocatable or 
complex relocatable expression. 

In the following examples, the field 
generated from the statement named ACON 
contains four constants, each of which 
occupies four bytes. Note that there is a 
location counter reference in one. The 
value of the location counter will be the 
address of the first byte allocated to the 
fourth constant. The second statement 
shows the same set of constants specified 
as literals (i.e., address constant 
literals) . 



i i Oper- i 

i Name i ation ! Operand 

I J L . 

lACONi DC iA(108, LOP, END-STRT,* +4096) 

,' ! LM j 4,7, =A(108, LOP, END-STRT, *+4096) 



Note: When the location counter reference 
occurs in a literal, as in the LM instruc- 
tion above, the value of the location 
counter is the address of the first byte of 
the instruction. 



Y-Type Address Constant: A Y-type address 
constant has much in common with the A-type 
constant. It too is specified as an abso- 
lute, relocatable, or complex relocatable 
expression. The value of the expression is 
also calculated to 32 bits as explained in 
Section 2. However, the maximum value of 
the expression may be only 2 i5 -l. The 
value is then truncated, if necessary, to 
the specified or implied length of the 
field and assembled into the right-most 
bits of the field. The implied length of a 
Y-type constant is two bytes, and alignment 
is to a half-word boundary unless a length 
is specified, in which case no alignment 
will occur. The maximum length of a Y-type 
address constant is two bytes. If length 
specification is used, a length of two 
bytes may be designated for a relocatable 
or complex expression and . 1 to 2 bytes for 
an absolute expression. 
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Warning : Specification of relocatable Y- 
type address constants should be avoided in 
programs destined to be executed on 
machines having more than 32,767 bytes of 
storage capacity. In any case Y-type re- 
locatable address constants should not be 
used in programs to be executed under 
Operating System/360 control. 



S-Type Address Constant; 
address constant is used 
address in base-displacement form. 



The S-type 
to store an 



The 
ways: 



constant may be specified in two 



1. 



2. 



As an absolute or relocatable 
sion, e.g., S(BETA). 



expres- 



As two absolute expressions, the first 
of which represents the displacement 
value and the second, the base reg- 
ister, e.g., S(400(13)). 



The address value represented by the 
expression in (1) will be converted by 
the assembler into the proper base register 
and displacement value. An S-type constant 
is assembled as a half word and aligned on 
a half-word boundary. The leftmost four 
bits of the assembled constant represents 
the base register designation, the remain- 
ing 12 bits the displacement value. 

If length specification is used, only 
two bytes may be specified. S-type address 
constants may not be specified as literals. 



Q-Type Address Constant (Assembler F only) : 
This constant is used to reserve storage 
for the offset of an external dummy 
section. This offset is added to the 
address of the block of storage allocated 
to external dummy sections to access the 
desired section. The constant is specified 
as a relocatable symbol which has been 
previously defined in a DXD or DSECT state- 
ment. The implied length of a Q-type 
address constant is four bytes and boundary 
alignment is to a full word? a length of 
1-4 bytes may be specified. No bit length 
specification is permitted in a Q-type 
constant. In the following example the 
constant VALUE has been previously defined 
in a DXD or DSECT statement. To access 
VALUE the value of A is added to the base 
address of the block of storage allocated 
for external dummy sections . Q-type ad- 
dress constants may not be specified in 
literals. 



r t T-" 1 

| Name | Operation | Operand | 

h x x 1 

| A J DC J Q (VALUE) | 

L J. X J 



V-Type Address Constant: This constant is 
used to reserve storage for the address of 
an external symbol that is used for effect- 
ing branches to other programs. The con- 
stant may not be used for external data 
references within an overlay program . The 
constant is specified as one relocatable 
symbol, which need not be identified by an 
EXTRN statement. Whatever symbol is used is 
assumed to be an external symbol by virtue 
of the fact that it is supplied in a V-type 
address constant. 

To suppress the automatic library call 
mechanism of the linkage editor for a 
constant identified in a V-type address con- 
stant, the programmer can identify it in a 
WXTRN statement (Assembler F only) . 

Note that specifying a symbol as the 
operand of a V-type constant does not 
constitute a definition of the symbol for 
this assembly. The implied length of a 
V-type address constant is four bytes, and 
boundary alignment is to a full word. A 
length modifier may be used to specify a 
length of either three or four bytes, in 
which case no such boundary alignment 
occurs. In the following example, 12 bytes 
will be reserved, because there are three 
symbols. The value of each assembled con- 
stant will be zero until the program is 
loaded. It must be emphasized that a V- 
type address constant of length less than 4 
can and will be processed by the Assembler 
but cannot be handled by the Linkage Editor. 

r T T t 

| Name | Operation | Operand | 

h + x ^ 

JVCONST j DC | V (SORT, MERGE, CALC) | 
L X X J 



DS — DEFINE STORAGE 



The DS instruction is used to reserve 
areas of storage and to assign names to 
those areas. The use of this instruction 
is the preferred way of symbolically defin- 
ing storage for work areas, input/output 
areas, etc. The size of a storage area 
that can be reserved by using the DS 
instruction is limited only by the maximum 
value of the location counter. 



j Operation j Operand 



I Name . „ . _ 

Y -+ +_ i 

Any sym- j DS |One or more op- 
bol or | | erands, separated 

blank | j by commas, writ- 

jten in the for- 
jmat described in 
| the following 
j text 
i J- J 
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The format of the DS operand is identi- 
cal to that of the DC operand; exactly the 
same subfields are employed and are written 
in exactly the same sequence as they are in 
the DC operand. Although the formats are 
identical, there are two differences in the 
specification of subfields. They are: 

1. The specification of data (subfield 4) 
is optional in a DS operand, but it is 
mandatory in a DC operand. If the 
constant is specified, it must be 
valid. 

2. The maximum length that may be speci- 
fied for character (C) and hexadecimal 
(X) field types is 65,535 bytes rather 
than 256 bytes. 

If a DS operand specifies a constant in 
subfield 4, and no length is specified in 
subfield 3, the assembler determines the 
length of the data and reserves the 
appropriate amount of storage. It does not 
assemble the constant. The ability to 
specify data and have the assembler calcu- 
late the storage area that would be 
required for such data is a convenience to 
the programmer. If he knows the general 
format of the data that will be placed in 
the storage area during program execution, 
all he needs to do is show it as the fourth 
subfield in a DS operand. The assembler 
then determines the correct amount of stor- 
age to be reserved, thus relieving the 
programmer of length considerations. 

If the DS instruction is named by a 
symbol, its value attribute is the location 
of the leftmost byte of the reserved area. 
The length attribute of the symbol is the 
length (implied or explicit) of the type of 
data specified. Should the DS have a 
series of operands, the length attribute 
for the symbol is developed from the first 
item in the first operand. Any positioning 
required for aligning the storage area to 
the proper type of boundary is done before 
the address value is determined. Bytes 
skipped for alignment are not set to zero. 



Each field type (e.g., hexadecimal, 
character, floating-point) is associated 
with certain characteristics (these are 
summarized in Appendix F) . The associated 
characteristics will determine which field- 
type code the programmer selects for the DS 
operand and what other information he adds, 
notably a length specification or a 
duplication factor. For example, the E 
floating-point field and the F fixed-point 
field both have an implied length of four 
bytes. The leftmost byte is aligned to a 
full-word boundary. Thus, either code 
could be specified if it were desired to 
reserve four bytes of storage aligned to a 
full-word boundary. To obtain a length of 
eight bytes, one could specify either the E 
or F field type with a length modifier of 
eight. However, a duplication factor would 
have to be used to reserve a larger area, 
because the maximum length specification 
for either type is eight bytes. Note also 
that specifying length would cancel any 
special boundary alignment. 



In contrast, packed and zoned decimal (P 
and Z) , character (C) , hexadecimal (X), and 
binary (B) fields have an implied length of 
one byte. Any of these codes, if used, 
would have to be accompanied by a length 
modifier, unless just one byte is to be 
reserved. Although no alignment occurs, 
the use of C and X field types permits 
greater latitude in length specifications, 
the maximum for either type being 65,535 
bytes. (Note that this differs from the 
maximum for these types in a DC instruc- 
tion.) Unless a field of one byte is 
desired, either the length must be speci- 
fied for the C, X, P, Z, or B field types, 
or else the data must be specified (as the 
fourth subfield), so that the assembler can 
calculate the length. 

To define four 10-byte fields and one 
100-byte field, the respective DS state- 
ments might be as follows: 
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r _ T T . . _., 

I Name | Operation | Operand | 

j. x x _ .| 

j FIELD |DS J4CL10 j 

| AREA |DS JCLIOO | 

I X X J 



Although FIELD might have been specified 
as one 40 -byte field, the preceding defini- 
tion has the advantage of providing FIELD 
with a length attribute of 10. This would 
be pertinent when using FIELD as an SS 
machine-instruction operand. 

Additional examples of DS statements are 
shown below: 



I" 



T T 

Name | Operation) Operand 



|ONE 


|DS | 


|TWO 


JDS | 


| THREE 


IDS | 


|FOUR 


DS | 


|FIVE 


DS | 



CL80(one 80-byte field, 

length attribute of 80 
80C(80 one- byte fields, 

length attribute of one 
6F(six full words, length 

attribute of four) 
D(one double word,, length 

attribute of eight) 
4H(four half-words,, 

length attribute of 

two) 



H 



Note: A DS statement causes the storage 
to be reserved but not set to zeros, 
be made as to the 



area 

No assumption should 

contents of the reserved area. 



Special uses of the Duplication Factor 



FORCING ALIGNMENT: The location counter 
can be forced to a double-word, full-word, 
or half-word boundary by using the 
appropriate field type (e.g., D„ F, or H) 
with a duplication factor of zero. This 
method may be used to obtain boundary 
alignment that otherwise would not be pro- 
vided. For example, the following state- 
ments would set the location counter to the 
next double-word boundary and then reserve 
storage space for a 128-byte field (whose 
leftmost byte would be on a double- word 
boundary) . 



DEFINING FIELDS OF AN AREA: A DS instruc- 
tion with a duplication factor of zero can 
be used to assign a name to an area of 
storage without actually reserving the 
area. Additional DS and/or DC instructions 
may then be used to reserve the area and 
assign names to fields within the area (and 
generate constants if DC is used) . 

For example, assume that 80-character 
records are to be read into an area for 
processing and that each record has the 
following format: 



Positions 5-10 
Positions 11-30 
Positions 31-36 
Positions 47-54 
Positions 55-62 



Payroll Number 

Employee Name 

Date 

Gross Wages 

Withholding Tax 



The following example illustrates how DS 
instructions might be used to assign a name 
to the record area, then define the fields 
of the area and allocate the storage for 
them. Note that the first statement names 
the entire area by defining the symbol 
RDAREA; the statement gives RDAREA a length 
attribute of 80 bytes, but does not reserve 
any storage. Similarly, the fifth state- 
ment names a six-byte area by defining the 
symbol DATE; the three subsequent state- 
ments actually define the fields of DATE 
and allocate storage for them. The second, 
ninth, and last statements are used for 
spacing purposes and, therefore, are not 
named. 



r — t t 

| Name | Operation | Operand 



| RDAREA 


DS 


|0CL80 




DS 


|CL4 


| PAYNO 


DS 


|CL6 


|NAME 


DS 


|CL20 


|DATE 


DS 


|0CL6 


|DAY 


DS 


|CL2 


| MONTH 


DS 


|CL2 


|YEAR 


DS 


|CL2 




DS 


|CL10 


| GROSS 


DS 


|CL8 


| FEDTAX 


DS 


|CL8 




DS 


|CL18 



L_. 



CCW — DEFINE CHANNEL COMMAND WORD 



r t t 1 

| Name | Operation | Operand | 

j. x __x 1 

| |DS |0D | 

(AREA |DS JCL128 | 

L X X J 



The CCW instruction provides a conven- 
ient way to define and generate an eight- 
byte channel command word aligned at a 
double-word boundary. CCW will cause any 
bytes skipped to be zeroed. The internal 
machine format of a channel command word is 
shown in Table 5-1. 
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Table 5-1. Channel Command Word 
r- 



|Byt 
j. 

11 
|2-4 

15 
I 

|6 
|7-8 

L 



T T 

e | Bits | Usage 



0-7 

8-31 

32-36 

37-39 

40-47 

48-63 



Command code 

Data address 

Flags 

Must be zero 

Set to zero 

Count 



32-35 

0100 



36-39 
1000 



The format 
statement is: 



of the CCW instruction 



j Operation j Operand 



| Any sym-lCCW 
|bol or 
blank 



| Name 

j. + — x 1 

| Four operands, 
(separated by commas, 
j specifying the con- 
| tents of the channel 
j command word in 
| the format 
| described in the 
j following text 
l x x J 

All four operands must appear. They are 
written, from left to right, as follows: 



1. An absolute expression that specifies 
the command code. This expression's 
value is right- justified in byte 1. 



An expression specifying the data 
address. This value is treated as a 
3-byte A-type constant. The value of 
this expression is in bytes 2-4. 



If there is a symbol in the name field 
of the CCW instruction, it is assigned the 
address value of the leftmost byte of the 
channel command word. The length attribute 
of the symbol is 8. 



LISTING CONTROL INSTRUCTIONS 



The listing control instructions are 
used to identify an assembly listing and 
assembly output cards, to provide blank 
lines in an assembly listing, and to desig- 
nate how much detail is to be included in 
an assembly listing. In no case are 
instructions or constants generated in the 
object program. Listing control statements 
with the exception of PRINT are not printed 
in the listing. 

NOTE: TITLE, SPACE, and EJECT statements 
will not appear in the source listing 
unless the statement is continued onto 
another card. Then the first card of the 
statement is printed. However, any of 
these three types of statements, if 
generated as macro instruction expansion, 
will never be listed regardless of 
continuation. 



TITLE — IDENTIFY ASSEMBLY OUTPUT 



4. 



An absolute expression that specifies 
the flags for bits 32-36 and zeros for 
bits 37-39. The value of this expres- 
sion is right- justified in byte 5. 
(Byte 6 is set to zero.) 



An absolute expression that specifies 
the count. The value of this expres- 
sion is right- justified in bytes 7-8. 



The following is an example of a CCW 
statement: 



r t t T 

| Name | Operation j Operand | 

y x x ) 

j | CCW |2,READAREA,X , 48 , ,80 j 
L X X J 



Note that the form of the third operand 
sets bits 37-39 to zero, as required. The 
bit pattern of this operand is as follows: 



The TITLE instruction enables the pro- 
grammer to identify the assembly listing 
and assembly output cards. The format of 
the TITLE instruction statement is as fol- 
lows: 



I 

I Name 



Special, 
sequence 
or vari- 
able sym- 
bol or 
blank 



Operation I Operand 



TITLE 



A sequence of char- 
acters , enclosed in 
apostrophes 



The name field may contain a special 
symbol of from one to four alphabetic or 
numeric characters in any combination. The 
contents of the name field are punched into 
columns 73-76 of all the output cards for 
the program except those produced by the 
PUNCH and REPRO assembler instructions. 
Only the first TITLE statement in a program 
may have a special symbol or a variable sym- 
bol in the name field. The name field of 
all subsequent TITLE statements must contain 
either a sequence symbol or a blank. 
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The operand field may contain up to 100 
characters enclosed in apostrophes. Spe- 
cial consideration must be given to rep- 
resenting apostrophes and ampersands as 
characters. Each single apostrophe or 
ampersand desired as a character in the 
constant must be represented by a pair of 
apostrophes or ampersands. Only one apos- 
trophe or ampersand appears in storage. 
The contents of the operand field are 
printed at the top of each page of the 
assembly listing. 



A program ma 
TITLE statement, 
vides the heading 
listing that foil 
statement is 
statement causes 
to a new page 
printed) . 



y contain more than one 

Each TITLE statement pro- 

for pages in the assembly 

ow it, until another TITLE 

encountered. Each TITLE 

the listing to be advanced 

(before the heading is 



i 

I Name 

I 

I 



., T 

I Operation | Operand 



A se- 



I quence 
I symbol 
I or blank 
I 



EJECT 



I Not used; should be \ 



blank 



If the line before the EJECT statement 
appears at the bottom of a page, the EJECT 
statement has no effect. Two EJECT state- 
ments may be used in succession to obtain a 
blank page. A TITLE instruction followed 
immediately by an EJECT instruction will 
produce a page with nothing but the operand 
entry (if any) of the TITLE instruction. 
Text following the EJECT instruction will 
begin at the top of the next page. 



For example, if the following statement 
is the first TITLE statement to appear in a 
program: 



SPACE — SPACE LISTING 



T T T 1 

J Name | Operation | Operand | 

,. x + .| 

JPGM1 j TITLE j 'FIRST HEADING' j 
L X J. J 



The SPACE instruction is used to insert 
one or more blank lines in the listing. 
The format of the SPACE instruction state- 
ment is as follows : 



then PGM1 is punched into all of the output 
cards (columns 73-76) arid this heading 

appears at the top of each subsequent page: 
PGM1 FIRST HEADING. 

If the following statement occurs later 
in the same program: 



i 

l Name 
I 



., -— T -- 

I Operation | Operand 



A se- 
quence 
symbol 
or blank 



SPACE 



A decimal value 
or blank 



r t t 1 

| Name j Operation | Operand | 

j. x + 4 

j j TITLE j 'A NEW HEADING* j 

L X . X . J 



A decimal value is used to specify the 
number of blank lines to be inserted in the 
assembly listing. A blank operand causes 
one blank line to be inserted. If this 
value exceeds the number of lines remaining 
on the listing page, the statement will 
have the same effect as an EJECT statement. 



then, PGM1 is still punched into the output 
cards, but each following page begins with 
the heading: PGM1 A NEW HEADING. 



Note: The sequence number of the cards in 
the output deck is contained in columns 
77-80. 



EJECT — START NEW PAGE 



The EJECT instruction causes the next 
line of the listing to appear at the top of 
a new page. This instruction provides a 
convenient way to separate routines in the 
program listing. The format of the EJECT 
instruction statement is as follows: 



PRINT — PRINT OPTIONAL DATA 

The PRINT instruction is used to control 
printing of the assembly listing. The 
format of the PRINT instruction statement 
is: 

, j . T — , 

I Name | Operation I Operand 

L ,_ 1 . 



I A se- 
I quence 
I symbol 
I or blank 
I 



PRINT ' One to three 
operands 
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The one to three operands may include an r t t t 

operand from each of the following groups l Name I Operation | Operand | 

in any sequence : ^ "•* + ^ 

j | PRINT | NODATA j 

1. ON - A listing is printed. »■ J- J- J 

OFF - No listing is printed. 



2. 



GEN - All statements generated by 
macro- instructions are print- 
ed. 



NOGEN 



- Statements generated by macro- 
instructions are not printed 
with the exception of MNOTE 
which will print regardless of 
NOGEN. However, the macro- 
instruction itself will appear 
in the listing. 



3. DATA 



- Constants are printed out 
full in the listing. 



in 



NOD ATA - Only the leftmost eight bytes 
are printed on the listing. 

A program may contain any number of 
PRINT statements. A PRINT statement con- 
trols the printing of the assembly listing 
until another PRINT statement is encoun- 
tered. Each option remains in effect 
until the corresponding opposite option is 
specified. 

Until the first PRINT statement (if any) 
is encountered, the following is assumed: 



is the last PRINT statement to appear 
before the DC statement, only eight bytes 
of zeros are printed in the assembly list- 
ing. 

Whenever an operand is omitted, it is 
assumed to be unchanged and continues 
according to its last specification. 

The hierarchy of print control state- 
ments is : 

1. ON and OFF 

2. GEN and NOGEN 

3. DATA and NODATA 

Thus with the following statement nothing 
would be printed. 



r t t 1 

| Name | Operation | Operand | 

H __ x + ., 

j j PRINT j OFF, DATA, GEN | 
L X X J 



r t t 1 

I Name | Operation | Operand | 

j. _x x ., 

I j PRINT j ON, NODATA, GEN j 

L . X X J 



For example, if the statement: 

r t t i 

| Name | Operation | Operand | 

,. x x 1 

| |DC |XL256*00' | 

L X X J 



appears in a program, 256 bytes of zeros 
are assembled. If the statement: 



PROGRAM CONTROL INSTRUCTIONS 



The program control instructions are 
used to specify the end of an assembly, to 
set the location counter to a value or word 
boundary, to insert previously written cod- 
ing in the program, to specify the place- 
ment of literals in storage, to check the 
sequence of input cards, to indicate state- 
ment format, and to punch a card. Except 
for the CNOP and COPY instructions, none of 
these assembler instructions generate 
instructions or constants in the object 
program. 



r t t n 

| Name | Operation (Operand | 

j. x + .j 

j | PRINT | DATA j 

L X X J 



is the last PRINT statement to appear 
before the DC statement, all 256 bytes of 
zeros are printed in the assembly listing. 
However, if : 



ICTL — INPUT FORMAT CONTROL 



The ICTL instruction allows the program- 
mer to alter the normal format of his 
source program statements. The ICTL state- 
ment must precede all other statements in 
the source program and may be used only 
once. The format of the ICTL instruction 
statement is as follows: 
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r -t t — ■ 1 

| Name | Operation | Operand | 

|"Blank~|icTL jl-rdeclmariilf-de~-j 
J I fining values of the 
l i il2£5?_^e^c J 



The operands 1 and r, respectively, 
specify the leftmost and rightmost columns 
of the field in the input cards to be 
checked. Operand r must be equal to or 
greater than operand 1. Columns to be 
checked must not be between the begin and 
end columns. 



Operand b specifies the begin column of 
the source statement. It must always be 
specified, and must be within 1-40, inclu- 
sive. Operand e specifies the end column 
of the source statement. The end column, 
when specified, must be within 41-80, in- 
clusive; when not specified, it is assumed 
to be 71. The end column must not be less 
than the begin column +5. The column after 
the end column is used to indicate whether 
the next card is a continuation card. 
Operand c specifies the continue column of 
the source statement. The continue column, 
when specified, must be within 2-40 and 
must be greater than b. If the continue 
column is not specified, or if column 80 is 
specified as the end column, the assembler 
assumes that there are no continuation 
cards, and all statements are contained on 
a single card. The operand forms b,,c and 
b, are invalid. 

If no ICTL statement is used in the 
source program, the assembler assumes that 
1, 71, and 16 are the begin, end, and 
continue columns, respectively. 



The next example designates the begin 
column as column 25. Since the end column 
is not specified, it is assumed to be 
column 71. No continuation cards are rec- 
ognized because the continue column is not 
specified. 



ISEQ — INPUT SEQUENCE CHECKING 



The ISEQ instruction is used to 
check the sequence of input cards. (A 
sequence error is considered serious , but 
the assembly is not terminated.) The 
format of the ISEQ instruction statement 
is as follows : 

r t t 1 

| Name | Operation | Operand | 

|BlankjlSEQ }Two"diSImil"iiIf-di- 1 

fining values of the 
l i . il2^D_ix£l_2£_^l§2]S j 



Sequence checking begins with the first 
card following the ISEQ statement. Compar- 
ison of adjacent cards makes use of the 
eight-bit internal collating sequence. 
(See Appendix A. ) Each card checked must 
be higher than the preceding card. 

An ISEQ statement with a blank operand 
terminates the operation. (Note that this 
ISEQ statement is also sequence checked.) 
Checking may be resumed with another ISEQ 
statement. 

Sequence checking is only performed on 
statements contained in the source program. 
Statements inserted by the COPY assembler- 
instruction or generated by a macro- 
instruction are not checked for sequence. 
Also macro-definitions in a macro library 
are not checked. 

PUNCH — PUNCH A CARD 



The PUNCH assembler- instruction causes 
the data in the operand to be punched into 
a card. One PUNCH statement produces one 
punched card. As many PUNCH statements may 
be used as are necessary. The format is: 



| Name | Operation 
PUNCH 



r — t t 1 I 

| Name | Operation | Operand | | 

,. + + ., L 

| | ICTL 1 25 | 

l A . X - . J 



A se- 
quence 
symbol 
or 
blank 



| Operand 

+ 

|1 to 80 characters 
| enclosed in apos- 
j trophes 



Using character representation, the 
operand is written as a string of up to 80 
characters enclosed in apostrophes. All 
characters, including blank, are valid. 
The position immediately to the right of 
the left apostrophe is regarded as column 
one of the card to be punched. Substitu- 
tion is performed for variable symbols in 
the operand. Special consideration must be 
given to representing apostrophes and 
ampersands as characters. Each apostrophe 
or ampersand desired as a character in the 
constant must be represented by a pair of 
apostrophes or ampersands. Only one apos- 
trophe or ampersand appears in storage. 

PUNCH statements may occur anywhere 
within a program, except before macro defi- 
nitions. They may occur within a macro 
definition but not between the end of a 
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macro definition and the beginning of the 
next macro definition. If a PUNCH state- 
ment occurs before the first control sec- 
tion, the resultant card will precede all 
other cards in the object program card 
deck; otherwise the card will be punched in 
place. No sequence number or identifi- 
cation is punched in the card. 

REPRO — REPRODUCE FOLLOWING CARD 



The REPRO assembler-instruction causes 
data on the following statement line to be 
punched into a card. The data is not 
processed; it is punched in a card, and no 
substitution is performed for variable sym- 
bols. No sequence number or identification 
is punched on the card. One REPRO instruc- 
tion produces one punched card. The REPRO 
instruction may not appear before a macro 
definition. REPRO statements that occur 
before all statements composing the first 
or only control section will punch cards 
which precede all other cards of the object 
deck. The format is: 



j Operation j Operand 
■H -I- 

REPRO I Blank 



I Name 

I 1 H 

A se- 



quence 
symbol 
or blank 



1 I J I 

The line to be reproduced may contain 
any combination of up to 80 valid charac- 
ters. Characters may be entered starting 
in column 1 and continuing through column 
8 of the line. Column 1 of the line 
corresponds to column 1 of the card to be 
punched. 

ORG — SET LOCATION COUNTER 



The ORG instruction is used to alter the 
setting of the location counter for the 
current control section. The format of the 
ORG instruction statement is: 



r t t 

| Name | Operation (Operand 



A se- 



quence 
symbol 



ORG 



j A relocatable ex- 
I pression or blank 



I ° r I 
blank 



Any symbols in the expression must have 
been previously defined. The unpaired 
relocatable symbol must be defined in the 
same control section in which the ORG 
statement appears. 



The location counter is set to the value 
of the expression in the operand. If the 
operand is omitted, the location counter is 
set to the next available (unused) location 
for that control section. 

An ORG statement cannot be used to 
specify a location below the beginning of 
the control section in which it appears. 
The following is invalid if it appears less 
than 500 bytes from the beginning of the 
current control section. 



r t t T 

I Name (Operation | Operand | 

|. + + 1 

III I 

j | ORG |*- 500 | 

L X JL J 

If it is desired to reset the location 
counter to the next available byte in the 
current control section, the following 
statement would be used: 

r t t 1 

| Name (Operation | Operand | 

j. 1 + .j 

I IORG | | 

I J. J. J 

If previous ORG statements have reduced 
the location counter for the purpose of 
redefining a portion of the current control 
section, an ORG statement with an omitted 
operand can then be used to terminate the 
effects of such statements and restore the 
location counter to its highest setting: 

Note : Through use of the ORG statement two 
instructions may be given the same location 
counter values. In such a case the second 
instruction will not always eliminate the 
effects of the first instruction. Consider 
the following example: 



ADDR 



DC A(LOC) 

ORG *-4 

DC C'BETA' 



In this example the value of B (BETA) will 
be destroyed by the relocation of ADDR 
during linkage editing. 

LTORG — BEGIN LITERAL POOL 

The LTORG instruction causes all liter- 
als since the previous LTORG (or start of 
the program) to be assembled at appropriate 
boundaries starting at the first double- 
word boundary following the LTORG 
statement. If no literals follow the LTORG 
statement, alignment of the next instruc- 
tion (which is not a LTORG instruction) 
will occur. Bytes skipped are not zeroed. 
The format of the LTORG instruction state- 
ment is : 
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r t t T 

I Name | Operation | Operand | 

y + + ^ 

j Symbol JLTORG JNot used j 

lor | | | 

| blank | | | 

i x j. J 



The symbol represents the address of the 
first byte of the literal pool. It has a 
length attribute of 1. 

The literal pool is organized into four 
segments within which the literals are 
stored in order of appearance, dependent on 
the divisibility properties of their object 
lengths (dup factor times total explicit 
or implied length) . The first segment 
contains all literals whose object length 
is a multiple of eight. Those remaining 
literals with lengths divisible by four 
are stored in the second segment. The 
third segment holds the remaining even- 
length literals. Any literals left over 
have odd lengths and are stored in the 
fourth segment. 

Since each literal pool begins at a 
double-word boundary, this guarantees that 
all segment one literals are double-word, 
segment two full-word, and segment three 
half-word aligned, with no space wasted 
except, possibly, at the pool origin. 

Literals from the following statement 
are in the pool, in the segments indicated 
by the circled numbers, where (§) means 
multiple of eight, etc., 

MVC A^J^F'l 1 © 

SH 3,=H'2' 

LM 0,3, = 2F'1,2' <&U 

IC 2,=XL1 , 1' Ci) 

AD 2,=D'2' ® 



@ 



Special Addressing Consideration 



Any literals used after the last LTORG 
statement in a program are placed at the 
end of the first control section. If there 
are no LTORG statements in a program, all 
literals used in the program are placed at 
the end of the first control section. In 
these circumstances the programmer must 
ensure that the first control section is 
always addressable. This means that the 
base address register for the first control 
section should not be changed through usage 
in subsequent control sections. If the 
programmer does not wish to reserve a 
register for this purpose, he may place a 
LTORG statement at the end of each control 
section thereby ensuring that all literals 
appearing in that section are addressable. 



Duplicate Literals 



If duplicate literals occur within the 
range controlled by one LTORG statement, 
only one literal is stored. Literals are 
considered duplicates only if their speci- 
fications are identical. A literal will be 
stored, even if it appears to duplicate 
another literal, if it is an A-type address 
constant containing any reference to the 
location counter. 

The following examples illustrate how 
the assembler stores pairs of literals, if 
the placement of each pair is controlled by 
the same LTORG statement. 



X'FO' 

CO' 

XL3'0' 

HL3 ' ' 
A(*+4) 

A(*+4) 

X'FFFF' 

X'FFFF" 



Both are stored 



Both are stored 



Both are stored 



Identical; the first is stored 



CNOP — CONDITIONAL NO OPERATION 

The CNOP instruction allows the program- 
mer to align an instruction at a specific 
half-word boundary. If any bytes must be 
skipped in order to align the instruction 
properly, the assembler ensures an unbroken 
instruction flow by generating no-operation 
instructions. This facility is useful in 
creating calling sequences consisting of a 
linkage to a subroutine followed by parame- 
ters such as channel command words (CCW) . 



The CNOP instructi 
ment of the location c 
half-word, word, or 
If the location counte 
aligned, the CNOP 
effect. If the 
requires the location 
mented, one to three 
tions are generated, e 
by t es . 



on ensures the align- 
ounter setting to a 
double-word boundary, 
r is already properly 
instruction has no 
specified alignment 
counter to be incre- 
no-operation instruc- 
ach of which uses two 



The format of the CNOP instruction 
statement is as follows: 



r t t 

(Name | Operation | Operand 



A se- 



ICNOP 
quence 

symbol 

or 

blank 



JTwo absolute 
(expressions of 
jthe form b,w 
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Double Word 



Word 



Word 



Half Word 



Half Word 



Half Word 



Half word 



Byte j Byte j Byte j Byte j Byte | Byte j Byte j Byte 



0,4 
0,8 



2,4 
2,8 



0,4 
4,8 



2,4 
6,8 



Figure 5-6. CNOP Alignment 



Any symbols used in the expressions in 
the operand field must have been previously 
defined. 

Operand b specifies at which byte in a 
word or double word the location counter is 
to be set; b can be 0, 2, 4, or 6. Operand 
w specifies whether byte b is in a word 
(w=4) or double word (w=8). The following 
pairs of b and w are valid: 



b,w Specifies 

0,4 Beginning of a word 

2,4 Middle of a word 

0,8 Beginning of a double word 

2,8 Second half word of a double word 

4,8 Middle (third half word) of a dou- 
ble word 

6,8 Fourth half word of a double word 

Figure 5-6 shows the position in a 
double word that each of these pairs speci- 
fies. Note that both 0,4 and 2,4 specify 
two locations in a double word. 



Assume that the location counter is 
currently aligned at a double-word bounda- 
ry. Then the CNOP instruction in this 
sequence: 



causes three branch-on-conditions 
(no-operations) to be generated, thus 
aligning the BALR instruction at the last 
half-word in a double word as follows: 



r t t 1 

| Name | Operation | Operand | 

j. x x j 

| |BCR | 0,0 | 

| |BCR | 0,0 | 

j |BCR | 0,0 | 

j | BALR 1 2, 14 | 

L X X J 



After the BALR instruction is generated, 
the location counter is at a double-word 
boundary, thereby ensuring an unbroken 
instruction flow. 



COPY — COPY PREDEFINED SOURCE CODING 



The COPY instruction obtains source- 
language coding from a library and includes 
it in the program currently being 
assembled. The format of the COPY instruc- 
tion statement is as follows: 



r t t 1 

| Name | Operation | Operand j 

h x x ^ 

| JCNOP j 0,8 j 

j | BALR | 2,14 | 

L X X J 



has no effect; it is merely printed in the 
assembly listing. However, this sequence: 



r T T n 

| Name | Operation | Operand | 

,. + + ^ 

| |CNOP | 6, 8 | 

| | BALR | 2,14 | 

L X x . j 



r t t 1 

| Name | Operation | Operand | 

F x x ) 

| Blank JCOPY |One symbol | 

l x x . J 



The operand is a symbol that identifies 
a partitioned data set member to be copied 
from either the system macro library or a 
user library concatenated to it. Insert- 
ing code in the library to be copied later 
is performed by the IEBUPDAT or IEBUPDTE 
routines, details of which are covered in 
the OS Utilities. 



The assembler inserts the requested cod- 
ing immediately after the COPY statement 
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is encountered. The requested coding may 
not contain any COPY, END, ICTL, ISEQ, 
MACRO, or MEND statements. 

If identical COPY statements are encoun- 
tered, the coding they request is brought 
into the program each time. All statements 
included in the program via COPY are proc- 
essed using the standard format regardless 
of any ICTL instructions in the program. 
(For a further discussion of COPY see 
Section 7.) 



END — END ASSEMBLY 



The operand specifies the point to which 
control may be transferred when loading is 
complete. This point is usually the first 
machine- instruction in the program, as 
shown in the following sequence. 



r t t 

| Name (Operation | Operand 

|. + + -I 

| NAME |CSECT | 
I AREA |DS |50F 

I BEGIN JBALR |2,0 
| USING J*, 2 



The END instruction terminates the 
assembly of a program. It may also desig- 
nate a point in the program or in a 
separately assembled program to which con- 
trol may be transferred after the program 
is loaded. The END instruction must always 
be the last statement in the source pro- 
gram. A literal may not be used. If an 
external symbol is used in the expression, 
the value of the expression must be 0. 

The format of the END instruction state- 
ment is as follows: 



r t t 1 

| Name | Operation | Operand | 

j. + + -I 

| Blank | END | A relocatable ex- | 
| J jpression or blank j 

i J. —J. J 



END 



I BEGIN 



I J. X J 

NOTE : Editing errors in system macro 
definitions (macro definitions included 
in a macro library) are discovered when 
the macro definitions are read from the 
macro library. This occurs after the END 
statement has been read. They will there- 
fore be flagged after the END statement. 
If the programmer does not know which of 
his system macros caused an error, it is 
necessary to punch all system macro defi- 
nitions used in the program, including 
inner macro definitions, and insert them 
in the source program as programmer macro 
definitions, since programmer macro defini- 
tions are flagged in-line. To aid in 
debugging it is advisable to test all macro 
definitions as programmer macro definitions 
before incorporating them in the library as 
system macro definitions. 
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PART II — THE MACRO LANGUAGE 

SECTION 6: INTRODUCTION TO THE MACRO LANGUAGE 

SECTION 7: HOW TO PREPARE MACRO DEFINITIONS 

SECTION 8: HOW TO WRITE MACRO INSTRUCTIONS 

SECTION 9: HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 

SECTION 10: EXTENDED FEATURES OF THE MACRO LANGUAGE 



SECTION 6: INTRODUCTION TO THE MACRO LANGUAGE 



The Operating System/360 macro language 
is an extension of the Operating System/360 
assembler language. It provides a conven- 
ient way to generate a desired sequence of 
assembler language statements many times in 
one or more programs. The macro-definition 
is written only once, and a single state- 
ment, a macro instruction statement,, is 
written each time a programmer wants to 
generate the desired sequence of state- 
ments . 



This facility simplifies the coding of 
programs , reduces the chance of programming 
errors, and ensures that standard sequences 
of statements are used to accomplish 
desired functions . 



THE MACRO DEFINITION 



A macro definition is a set of 
statements that provides the assembler 
with: (1) the mnemonic operation code and 
the format of the macro instruction, and 
(2) the sequence of statements the assem- 
bler generates when the macro instruction 
appears in the source program. 

Every macro definition consists of a 
macro definition header statement, a macro 
instruction prototype statement, one or 
more model statements, COPY statements, 
MEXIT., MNOTE, or conditional assembly 
instructions, and a macro definition trail- 
er statement. 



An additional facility, called condi- 
tional assembly, allows one to code state- 
ments which may or may not be assembled, 
depending upon conditions evaluated at 
assembly time. These conditions are usual- 
ly tests of values, which may be defined, 
set, changed, and tested during assembly. 
The conditional assembly facility may be 
used without using macro instruction state- 
ments . 



The macro definition header and trailer 
statements indicate to the assembler the 
beginning and end of a macro definition. 

The macro instruction prototype state- 
ment specifies the mnemonic operation code 
and the type of the macro instruction. 

The model statements are used by the 
assembler to generate the assembler lan- 
guage statements that replace each occur- 
rence of the macro instruction. 



THE MACRO INSTRUCTION STATEMENT 

A macro instruction statement (hereafter 
called a macro instruction) is a source 
program statement. The assembler generates 
a sequence of assembler language statements 
for each occurrence of the same macro 
instruction. The generated statements are 
then processed like any other assembler 
language statement. 

Macro instructions can be tested by 
placing them before the assembly cards of a 
test program. 

Three types of macro instructions may be 
written. They are positional, keyword, and 
mixed-mode macro instructions. Positional 
macro instructions permit the programmer to 
write the operands of a macro instruction 
in a fixed order. Keyword macro 
instructions permit the programmer to write 
the operands of a macro instruction in a 
variable order. Mixed-mode macro 
instructions permit the programmer to use 
the features of both positional and keyword 
macro instructions in the same macro 
instruction. 



The COPY statements may be used to copy 
model statements, MEXIT, MNOTE or condi- 
tional assembly instructions from a system 
library into a macro definition. 

The MEXIT instruction can be used to 
terminate processing of a macro definition. 

The MNOTE instruction can be used to 
generate an error message when the rules 
for writing a particular macro instruction 
are violated. 

The conditional assembly instructions 
may be used to vary the sequence of state- 
ments generated for each occurrence of a 
macro instruction. Conditional assembly 
instructions may also be used outside 
macro definitions, i.e., among the assem- 
bler language statements in the program. 



THE MACRO LIBRARY 



The same macro definition may be made 
available to more than one source program 
by placing the macro definition in the 
macro library. The macro library is a 
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collection of macro definitions that can be 
used by all the assembler language programs 
in an installation. Once a macro 
definition has been placed in the macro 
library it may be used by writing its 
corresponding macro instruction in a source 
program. Macro definitions must be in the 
system macro library under the same name as 
the prototype. The procedure for placing 
macro definitions in the macro library is 
described in the Utilities publication. 



VARYING THE GENERATED STATEMENTS 



Each time a macro instruction appears in 
the source program it is replaced by the 
same sequence of assembler language 
statements. Conditional assembly instruc- 
tions, however, may be used to vary the 
number and format of the generated state- 
ments . 



SYSTEM AND PROGRAMMER MACRO DEFINITIONS 



A macro definition included in a source 
deck is called a programmer macro defini- 
tion. One residinq in a macro library is 
called a system macro definition. There 
is no difference in function. If a pro- 
grammer macro is included in a macro 
library it becomes a system macro defini- 
tion, and if a system macro definition is 
punched and included in a source deck it 
becomes a programmer macro definition. 

System and programmer macros will be 
expanded the same, but syntax errors are 
handled differently. In programmer macros, 
error messages are attached to the state- 
ments in error. In system macros, however, 
error messages cannot be associated with 
the statement in error because these macros 
are located and edited after the entire 
source deck has been read. Therefore, the 
error messages are associated with the END 
statement. 

Because of the difficulty of finding 
syntax errors in system macros , a macro 
definition should be run and "debugged" as 
a programmer macro before it is placed in a 
macro library. 



VARIABLE SYMBOLS 



A variable symbol is a type of symbol 
that is assigned different values by either 
the programmer or the assembler. When the 
assembler uses a macro definition to deter- 
mine what statements are to replace a 
macro instruction, variable symbols in the 
model statements are replaced with the 
values assigned to them. By changing the 
values assigned to variable symbols the 
programmer can vary parts of the generated 
statements. 

A variable symbol is written as an 
ampersand followed by from one through 
seven letters and/or digits, the first of 
which must be a letter. Elsewhere, two 
ampersands must be used to represent an 
ampersand. 



SYSTEM MACRO INSTRUCTIONS 



Types of Variable Symbols 



The macro instructions that correspond 
to macro definitions prepared by IBM are 
called system macro instructions. System 
macro instructions are described in OS 
Supervisor Services and Macro Instructions , 
and OS Data Management Macro Instructions . 



There are three types of variable sym- 
bols: symbolic parameters, system variable 
symbols, and SET symbols. The SET symbols 
are further broken down into SETA symbols, 
SETB symbols, and SETC symbols. The three 
types of variable symbols differ in the way 
they are assigned values. 
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Assigning Values to Variable Symbols 



ORGANIZATION OF THIS PART OF THE 
PUBLICATION 



Symbolic parameters are assigned values 
by the programmer each time he writes a 
macro instruction. 

System variable symbols are assigned 
values by the assembler each time it proc- 
esses a macro instruction. 

SET symbols are assigned values by the 
programmer by means of conditional assembly 
instructions . 

Global SET Symbols 

The values assigned to SET symbols in 
one macro definition may be used to vary 
the statements that appear in other macro 
definitions. All SET symbols used for this 
purpose must be defined by the programmer 
as global SET symbols. All other SET 
symbols (i.e., those which may be used to 
vary statements that appear in the same 
macro definition) must be defined by the 
programmer as local SET symbols. Local SET 
symbols and the other variable symbols 
(that is, symbolic parameters and system 
variable symbols) are local variable 
symbols. Global SET symbols are global 
variable symbols. 



Sections 7 and 8 describe the basic 
rules for preparing macro definitions and 
for writing macro instructions. 

Section 9 describes the rules for writ- 
ing conditional assembly instructions. 

Section 10 describes additional features 
of the macro language, including rules for 
defining global SET symbols, preparing key- 
word and mixed-mode macro definitions, and 
writing keyword and mixed-mode macro 
instructions . 

Appendix G contains a reference summary 
of the entire macro language. 

Examples of the features of the language 
appear throughout the remainder of the 
publication. These examples illustrate the 
use of particular features. However, they 
are not meant to show the full versatility 
of these features. 
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SECTION 7: HOW TO PREPARE MACRO DEFINITIONS 



A macro definition consists of: 
1. A macro definition header statement. 



definition and must be the last statement 
in every macro definition. The format of 
this statement is: 



2. 



A macro instruction prototype state- 
ment. 



3. Zero or more model statements, COPY 
statements, MEXIT, MNOTE, or 
conditional assembly instructions. 

U. A macro definition trailer statement. 

Except for MEXIT, MNOTE, and conditional 
assembly instructions, this section of the 
publication describes all of the statements 
that may be used to prepare macro definitions 
Conditional assembly instructions are 
described in Section 9. MEXIT and MNOTE 
instructions are described in Section 10. 



Macro definitions appearing in a source 
program must appear before all PUNCH and 
REPRO statements and all statements which 
pertain to the first control section. 
Specifically, only the listing control 
instructions (EJECT, PRINT, SPACE, and 
TITLE), OPSYN, ICTL, and ISEQ instructions, 
and comments statements can occur before 
the macro definitions. All but the ICTL 
and OPSYN instruction can appear between 
macro definitions if there is more than 
one definition in the source program. 
Conditional assembly, substitution, and 
sequence symbols cannot be used in front of 
or between macro definitions. 

A macro -definition cannot appear within 
a macro definition and the maximum number 
of continuation cards for a macro definition 
statement is two. 

MACRO — MACRO DEFINITION HEADER 

The macro definition header statement 
indicates the beginning of a macro 
definition. It must be the first statement 
in every macro definition. The format of 
this statement is: 

r t t T 

| Name | Operation | Operand | 

|. x x ., 

| Blank | MACRO j Blank j 

L X X J 

MEND ~ MACRO DEFINITION TRAILER 



| Name | Operation j Operand 

^ 



| A se- Jme ND 
I quence 
■ symbol ! 

I or 
blank • 

I 



Blank 



MACRO INSTRUCTION PROTOTYPE 



The macro instruction prototype state- 
ment (hereafter called the prototype 
statement) specifies the mnemonic operation 
code and the format of all macro 
instructions that refer to the macro 
definition. It must be the second state- 
ment of every macro definition. The format 
of this statement is: 



I Name 



j. 

| A symbolic 
j parameter 
j or blank 



"T T" 

| Operation | Operand 



x x -J 

| A symbol | One or more sym- | 
j jbolic parameters j 
| | separated by com- j 
I jmas, or blank j 
x x J 



The symbolic parameters are used in the 
macro definition to represent the name 
field and operands of the corresponding 
macro instruction. A description of 
symbolic parameters appears under "Symbolic 
Parameters" in this section. 

The name field of the prototype state- 
ment may be blank, or it may contain a 
symbolic parameter. 

The symbol in the operation field is the 
mnemonic operation code that must appear in 
all macro instructions that refer to this 
macro definition. The mnemonic operation 
code must not be the same as the mnemonic 
operation code of another macro definition 
in the source program or of a machine or 
assembler instruction as listed in Appendix 
G. 



The macro definition trailer statement 
indicates the end of a macro definition. 
It can appear only once within a macro 



The operand field may contain to 200 
symbolic parameters separated by commas. 
If there are no symbolic parameters, com- 
ments may not appear. 
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The following is an example of a 
prototype statement. 



r t t 1 

| Name | Operation | Operand | 

|. + + _ ., 

| £NAME | MOVE | £TO, &FROM j 

L X X J 



Statement Format 



The prototype statement may be written 
in a format different' from that used for 
assembler language statements. The normal 
format is described in Part I of this pub- 
lication. The alternate format described 
here allows the programmer to write an 
operand on each line, and allows the inter- 
spersing of operands and comments in the 
statement . 



In the alternate format, as in the 
normal format, the name and operation 
fields must appear on the first line of the 
statement, and at least one blank must 
follow the operation field on that line. 
Both types of statement formats may be used 
in the same prototype statement. 



The rules for using the alternate state- 
ment format are: 



1. If an operand is followed by a comma 
and a blank, and the column after the 
end column contains a nonblank charac- 
ter, the operand field may be contin- 
ued on the next line starting in the 
continue column. More than one oper- 
and may appear on the same line. 

2. Comments may appear after the blank 
that indicates the end of an operand, 
up to and including the end column. 

3. If the next line starts after the 
continue column, the information 
entered on the next line is considered 
comments, and the operand field is 
considered terminated. Any subsequent 
continuation lines are considered com- 
ments . 



The following examples illustrate: (1) 
the normal statement format, (2) the alter- 
nate statement format, and (3) a combina- 
tion of both statement formats. 



Name 



NAME1 



NAME 2 



NAME 3 



Oper- 
ation 



0P1 



0P2 



0P3 



Operand 



Comments 



•T~1 



OPERANDI , OPERAND2 , OPERAN 
D3 THIS IS THE NORMAL 
STATEMENT FORMAT 



OPERANDI, THIS IS THE AL 
OPERAND2 , OPERAND3 TERNA 
TE STATEMENT FORMAT 



OPERANDI, THIS IS A COMB 
OPERAND 2 , OPERAND 3 , OPERAN 
D4,OPERAND5 INATION OF 
BOTH STATEMENT FORMATS 



+H 
x 

X 

+-r 

X 
X 

■H 

X 
X 
X 

-X-J 



MODEL STATEMENTS 

Model statements are the macro definition 
statements from which the desired sequences 
of assembler language statements are 
generated. Zero or more model statements 
may follow the prototype statement. A 
model statement consists of one to four 
fields. They are, from left to right, the 
name, operation, operand, and comments 
fields . 

The fields in the model statement must 
correspond to the fields in the generated 
statement. It is not possible to generate 
blanks to separate statement fields. 

Model statement fields must follow the 
rules for paired apostrophes , ampersands , 
and blanks as macro instruction operands 
(see "Macro Instruction Operands" in 
Section 8) ; 

Though model statements must follow the 
normal continuation card conventions , 
statements generated from model statements 
may have more than two continuation lines. 
Substituted statements may not have blanks 
in any field except between paired apostro- 
phes . They may not have leading blanks in 
the name field. 

Name Field 

The name field may be blank or it may 
contain an ordinary symbol , a variable 
symbol, or a sequence symbol. It may also 
contain an ordinary symbol concatenated 
with a variable symbol or a variable sym- 
bol concatenated with one or more other 
variable symbols. 

Variable symbols may not appear in the 
name field of ACTR, COPY, END, ICTL, ISEQ, 
or OPSYN statements. The characters * and 
.* may not be substituted for a variable 
symbol . 



Operation Field 



The operation field may contain a 
machine instruction, an assembler instruc- 
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tion listed in Section 5 (except END, ICTL, 
ISEQ, OPSYN, or PRINT) , a macro instruction, 
or variable symbol. It may also contain an 
ordinary symbol concatenated with a variable 
symbol or a variable symbol concatenated 
with one or more other variable symbols. 

Variable symbols may not be used to 
generate 

• Macro Instructions 

• Macro prototypes 

• The following instructions: 



ACTR 


GBLA 


MEXIT 


AGO 


GBLB 


MNOTE 


AIF 


GBLC 


OPSYN 


ANOP 


ICTL 


PRINT 


COPY 


ISEQ 


REPRO 


CSECT 


LCLA 


SETA 


DSECT 


LCLB 


SETB 


END 


LCLC 


SETC 




MACRO 


START 




MEND 





Variable symbols may also be used outside 
of macro definitions to generate mnemonic 
operation codes with the preceding 
restrictions. 



The use of COPY instructions is de- 
scribed under "COPY Statements". 

Variable symbols in the line following 
a REPRO instruction, will not be replaced 
by their values. 

Operand Field 

The operand field may contain ordinary 
symbols or variable symbols. However, 
variable symbols may not be used in the 
operand field of COPY, ICTL, ISEQ, or OPSYN 
instructions. 

Comments Field 

The comments field may contain any 
combination of characters . No substitution 
is performed for variable symbols appearing 
in the comments field. Only generated 
statements will be printed in the listing. 

SYMBOLIC PARAMETERS 

A symbolic parameter is a type of varia- 
ble symbol that is assigned values by the 
programmer when he writes a macro 
instruction. The programmer may vary 
statements that are generated for each 
occurrence of a macro instruction by vary- 
ing the values assigned to symbolic param- 
eters. 



A symbolic parameter consists of an 
ampersand followed by from one through 
seven letters and/or digits, the first of 
which must be a letter. Elsewhere, two 
ampersands must be used to represent an 
ampersand. 

The programmer should not use 6SYS as 
the first four characters of a symbolic 
parameter . 



The 
eters : 

6 READER 
SA23456 
6X4F2 



following are valid symbolic param- 



6LOOP2 

6N 

6$4 



The following are invalid symbolic pa- 
rameters: 

CARDAREA (first character is not an 
ampersand) 

6 256B (first character after 
ampersand is not a 
letter) 

6AREA2U56 (more than seven characters 
after the ampersand) 

£BCD%34 (contains a special charac- 
ter other than initial 
ampersand) 

6 IN AREA (contains a special charac- 
ter, i.e. , blank, other 
than initial ampersand) 

Any symbolic parameters in a model 
statement must appear in the prototype 
statement of the macro definition. 

The following is an example of a macro 
definition. Note that the symbolic 
parameters in the model statements appear 
in the prototype statement. 















jName 


(Operation 


| Operand 


1 




h 


-+ 


-+ 


-H 


Header 


1 


| MACRO 


1 




Prototype j SNAME 


| MOVE 


j STO, SFROW 




Model 


l&NAME 


|ST 


| 2 , SAVE 




Model 


1 


|L 


| 2,6 FROM 




Model 


1 


JST 


|2,ST0 




Model 


1 


|L 


| 2 , SAVE 




Trailer 


1 


|MEND 


1 








X 


JL 





Symbolic parameters in model statements 
are replaced by the characters of the 
macro instruction that correspond to the 
symbolic parameters. 

In the following example the characters 
HERE, FIELD A, and FIELDB of the MOVE macro 
instruction correspond to the symbolic 
parameters SNAME, STO, and 6 FROM, respec- 
tively, of the MOVE prototype statement. 
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r t t 1 

| Name | Operation | Operand | 

j. + + ^ 

| HERE | MOVE j FIELDA,FIELDB j 

L X X J 



The macro definition, macro instruction, 
and generated statements in the following 
example illustrate these rules. 



Any occurrence of the symbolic parame- 
ters SNAME, STO, and SFROM in a model 
statement will be replaced by the charac- 
ters HERE, FIELDA, and FIELDB, respective- 
ly. If the preceding macro instruction were 
used in a source program, the following 
assembler language statements would be gen- 
erated: 



T T 

| Name (Operation | Operand 



| HERE 



|ST 
j ST 



■+- 
| 2 , SAVE 
| 2, FIELDB 
| 2 , FIELDA 
| 2, SAVE 

-X 



The example below illustrates another 
use of the MOVE macro instruction using 
operands different from those in the 
preceding example. 



r — ■ t- t 1 

| Name (Operation (Operand | 
,. x + i 

Macro (LABEL |MOVE | IN, OUT | 
,. x x ., 

Generated (LABEL JST j 2, SAVE j 
Generated! |L (2, OUT | 
Generated! |ST |2,IN | 
Generated! |L (2, SAVE | 
l x x j 



If a symbolic parameter appears in the 
comments field of a model statement, it is 
not replaced by the corresponding charac- 
ters of the macro instruction. 



Concatenating Symbolic Parameters with 
Other Characters or* Other Symbolic 
Parameters 



If a symbolic parameter in a model 
statement is immediately preceded or fol- 
lowed by other characters or another sym- 
bolic parameter, the characters that cor- 
respond to the symbolic parameter are com- 
bined in the generated statement with the 
other characters or the characters that 
correspond to the other symbolic parameter. 
This process is called concatenation. 



Header 
Prototype! 
Model | 
Model j 
Model | 
Model | 
Trailer | 

I 
Macro | 

I 
Generated! 
Generated! 
Generated! 
Generated 



r t t 

| Name ( Operation | Operand 
|_— — x x 



J MACRO 


1 


SNAME | MOVE 


| STY, SP, STO, SFROM 


SNAME |STSTY 


( 2 , SAVEAREA 


|LSTY 


|2,SPSFROM 


|STSTY 


|2,6PSTO 


|LSTY 


| 2, SAVEAREA 


|MEND 

X — 


1 
X — — 


t 


— t 


HERE | MOVE 

X _ 


(D,FIELD,A,B 
_ X - - — 


T 


T 


HERE |STD 


| 2 , SAVEAREA 


|LD 


| 2 , FIELDB 


|STD 


| 2 , FIELDA 


|LD 


| 2 , SAVEAREA 



The symbolic parameter STY is used in 
each of the four model statements to vary 
the mnemonic operation code of each of the 
generated statements. The character D in 
the macro instruction corresponds to sym- 
bolic parameter STY. Since STY is preceded 
by other characters (i.e., ST and L) in the 
model statements, the character that cor- 
responds to STY (i.e., D) is concatenated 
with the other characters to form the 
operation fields of the generated state- 
ments . 

The symbolic parameters SP, STO, and 
SFROM are used in two of the model state- 
ments to vary part of the operand fields of 
the corresponding generated statements. 
The characters FIELD, A, and B correspond 
to the symbolic parameters SP, STO, and 
SFROM, respectively. Since SP is followed 
by SFROM in the second model statement, the 
characters that correspond to them (i.e., 
FIELD and B) are concatenated to form part 
of the operand field of the second generat- 
ed statement. Similarly, FIELD and A are 
concatenated to form part of the operand 
field of the third generated statement. 

If the programmer wishes to concatenate 
a symbolic parameter with a letter, digit, 
left parenthesis, or period following the 
symbolic parameter he must immediately fol- 
low the symbolic parameter with a period. 
A period is optional if the symbolic param- 
eter is to be concatenated with another 
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symbolic parameter, or a special character 
other than a left parenthesis or another 
period that follows it. 

If a symbolic parameter is immediately 
followed by a period, then the symbolic 
parameter and the period are replaced by 
the characters that correspond to the sym- 
bolic parameter. A period that immediately 
follows a symbolic parameter does not 
appear in the generated statement. 

The following macro definition, macro- 
instruction, and generated statements 
illustrate these rules. 





r 


•T ~ " 








|Name 


| Opera J 


tion| Operand 


1 




j. 


-+ 


+ 


H 


Header 




1 MACRO 


1 




Prototype 


|SNAME|MOVE 


|SP,£S, SRl,SR2 




Model 


|SNAME|ST 


|£R1,£S. (&R2) 




Model 




|L 


|6R1,£P.B 




Model 




|ST 


|SR1,SP.A 




Model 




|L 


|&R1,&S. UR2) 




Trailer 


i 


|MEND 


1 


i 




r 


T 


t 


i 


Macro 


|HERE 

L 


| MOVE 
-X — 


| FIELD, SAVE, 2, 4 
_ j. 


i 




r 


T 


T 


1 


Generated 


|HERE 


|ST 


|2,SAVEU) 




Generated 




|L 


|2,FIELDB 




Generated 




|ST 


|2,FIELDA 




Generated 




|L 


|2,SAVE(4) 






L 


.1 .,.._ 


J. 


i 



The symbolic parameter £P is used in the 
second and third model statements to vary 
part of the operand field of each of the 
corresponding generated statements. The 
characters FIELD of the macro instruction 
correspond to 6 P. Since 6P is to be 
concatenated with a letter (i.e., B and A) 
in each of the statements, a period immedi- 
ately follows SP in each of the model 
statements. The period does not appear in 
the generated statements. 



COMMENTS STATEMENTS 



A model statement may be a comments 
statement. A comments statement consists 
of an asterisk in the begin column, fol- 
lowed by comments. The comments statement 
is used by the assembler to generate an 
assembler language comments statement, just 
as other model statements are used by the 
assembler to generate assembler language 
statements. No variable symbol substitu- 
tion is performed. 

The programmer may also write comments 
statements in a macro-definition which are 
not to be generated. These statements must 
have a period in the begin column, immedi- 
ately followed by an asterisk and the 
comments . 

The first statement in the following 
example will be used by the assembler to 
generate a comments statement; the second 
statement will not. 

r 1 

| Name | Operation | Operand | 

j. ., 

| * THIS STATEMENT WILL BE GENERATED | 
j . * THIS ONE WILL NOT BE GENERATED j 

L J 



NOTE: To get a truly representative sampl- 
ing of the various language components used 
effectively in writing macro instructions 
the programmer may list all or selected 

macro instructions from the SYS1.GENLIB or 
the SYS1.MACLIB by using the IEBPTPCH sys- 
tem utility covered in the OS Utilities 
manual. 



COPY STATEMENTS 



Similarly, sym 
in the first and 
vary the operand 
ing generated sta 
by a period in 
ments, because it 
with a left par 
not appear in the 



bolic parameter 6S is used 
fourth model statements to 
fields of the correspond- 
tements. £S is followed 
each of the model state- 
is to be concatenated 
enthesis. The period does 
generated statements. 



COPY statements may be used to copy 
model statements and MEXIT, MNOTE, and 
conditional assembly instructions into a 
macro-definition, just as they may be used 
outside macro definitions to copy source 
statements into an assembler language pro- 
gram. 
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The format of this statement is : 

r t t ■ 1 

| Name | Operation | Operand | 

k x x__ ., 

| Blank J COPY JA symbol J 

l x x j 



The operand is a symbol that identifies 
a partitioned data set member to be copied 
from either the system macro library or a 
user library concatenated to it. The sym- 
bol must not be the same as the operation 
mnemonic of a definition in the macro 
library. Any statement that may be used 
in a macro definition may be part of the 
copied coding, except MACRO, MEND, COPY, 
and prototype statements. 



When considering statement positions 
within a program the code included by a 
COPY instruction statement should be con- 
sidered rather than the COPY itself. For 
example if a COPY statement in a macro- 
definition brings in global and local 
definition statements, it may appear 
immediately after the prototype statement. 
However, since global definition statements 
must come before local definition state- 
ments, if global and local definition 
statements are also specified explicitly in 
the macro definition which contains the 
COPY, the COPY must occur between the 
explicit global definition statements and 
the explicit local definition statements. 
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SECTION 8: HOW TO WRITE MACRO- INSTRUCTIONS 



The format of a macro instruction is: 

r t t 1 

| Name | Operation | Operand | 

|. + + ^ 

| Any sym- | Mnemonic | 0-200 operands, | 
I bol or j operation j separated by | 
| blank | code j commas. J 

l A X J 

The name field of the macro instruction 
may contain a symbol. The symbol will not 
be defined unless a symbolic parameter 
appears in the name field of the prototype 
and the same parameter appears in the name 
field of a generated model statement. 

The operation field contains the mnemon- 
ic operation code of the macro instruction. 
The mnemonic operation code must be the 
same as the mnemonic operation code of a 
macro definition in the source program or 
in the macro library. 

The macro definition with the same mne- 
monic operation code is used by the assem- 
bler to process the macro instruction. If 
a macro definition in the source program 
and one in the macro library have the same 
mnemonic operation code, the macro 
definition in the source program is used. 

The placement and order of the operands 
in the macro instruction is determined by 
the placement and order of the symbolic 
parameters in the operand field of the 
prototype statement. 



MACRO INSTRUCTION OPERANDS 



A quoted string ends with the first 
even- numbered apostrophe that is not 
immediately followed by another apostrophe. 

The first and last apostrophes of a 
quoted string are called paired apostroph- 
es. The following example contains two 
quoted strings. The first and fourth and 
the fifth and sixth apostrophes are each 
paired apostrophes. 

•A'^'C'D' 

An apostrophe not within a quoted 
string, immediately followed by a letter, 
and immediately preceded by the letter L 
(when L is preceded by any special charac- 
ter other than an ampersand) , is not con- 
sidered in determining paired apostrophes. 
For instance, in the following example, the 
apostrophe is not considered. 

L' SYMBOL 

*AL' SYMBOL' is an invalid operand. 



Paired Parentheses: There must be an equal 
number of left and right parentheses. The 
nth left parenthesis must appear to the 
left of the nth right parenthesis. 

Paired parentheses are a left parenthe- 
sis and a following right parenthesis with- 
out any other parentheses intervening. If 
there is more than one pair, each addition- 
al pair is determined by removing any pairs 
already recognized and reapplying the above 
rule for paired parentheses. For instance, 
in the following example the first and 
fourth, the second and third, and the fifth 
and sixth parentheses are each paired pa- 
rentheses. 



Any combination of up to 255 characters 
may be used as a macro instruction operand 
provided that the following rules 
concerning apostrophes, parentheses, equal 
signs, ampersands, commas, and blanks are 
observed. 

Paired Apostrophes: An operand may contain 
one or more quoted strings. A quoted 
string is any sequence of characters that 
begins and ends with an apostrophe and 
contains an even number of apostrophes. 

The first quoted string starts with the 
first apostrophe in the operand. Subse- 
quent quoted strings start with the first 
apostrophe after the apostrophe that ends 
the previous quoted string. 



(A(B)OD(E) 

A parenthesis that appears between 
paired apostrophes is not considered in 
determining paired parentheses. For 
instance, in the following example the 
middle parenthesis is not considered. 

(•)') 

Equal Signs: An equal sign can only occur 
as the first character in an operand or 
between paired apostrophes or paired pa- 
rentheses. The following examples illus- 
trate these rules. 

=F'32' 

•C=D' 

E(F=G) 
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Ampersands ; Except as noted under "Inner 
Macro Instructions," each sequence of con- 
secutive ampersands must be an even number 
of ampersands. The following example 
illustrates this rule. 

ggl23gggg 

Commas : A comma indicates the end of an 
operand, unless it is placed between paired 
apostrophes or paired parentheses. The 
following example illustrates this rule. 

(A,B)C , , f 

Blanks; Except as noted under "Statement 
Format," a blank indicates the end of the 
operand field,, unless it is placed between 
paired apostrophes. The following example 
illustrates this rule. 



•A B C 

The following are 
instruction operands: 

SYMBOL 

123 

X'189A' 

* 

L'NAME 
•TEN = 10' 
•QUOTE IS* ' • 



valid 



A+2 

(TO (8), FROM) 

0(2,3) 

=F , 4096 f 

AB6S9 

•PARENTHESIS IS ) 

•COMMA IS ,' 



macro- 



The following are 
instruction operands: 



invalid macro- 



W'NAME 
5A)B 



(15 B) 



ONE' IS 



(odd number of apostrophes) 
(number of left parentheses 

does not equal number of 

right parentheses) 
(blank not placed between 

paired apostrophes) 
(blank not placed between 

paired apostrophes) 



separated it from the next operand must be 
present. If the last operand (s) is omitted 
from a macro instruction, then the comma (s) 
separating the last operand (s) from the 
next previous operand may be omitted. 

The following example shows a macro 
instruction preceded by its corresponding 
prototype statement. The macro instruction 
operands that correspond to the third and 
sixth operands of the prototype statement 
are omitted in this example. 

r t t i 

| Name {Operation | Operand | 

j. + + _ _ 1 

| j EXAMPLE |SA,gB,6C,SD,SE,SF j 
I j EXAMPLE j 17, *+4,, AREA, FIELD (6) | 
I J. J. j 

If the symbolic parameter that 
corresponds to an omitted operand is used 
in a model statement, a null character 
value replaces the symbolic parameter in 
the generated statement, i.e., in effect 
the symbolic parameter is removed. For 
example, the first statement below is a 
model statement that contains the symbolic 
parameter gc. If the operand that corres- 
ponds to gc was omitted from the macro 
instruction, the second statement below 
would be generated from the model 
statement. 

r t t 1 

| Name (Operation | Operand J 

j. + + ., 

j JMVC |THEREgC.25,THIS j 
| |MVC |THERE25,THIS j 

L J. X J 



STATEMENT FORMAT 



OPERAND SUBLISTS 



Macro instructions may* be written using 
the same alternate format that can be used 
to write prototype statements. If this 
format is used, a blank does not always 
indicate the end of the operand field. The 
alternate format is described in Section 7, 
under the subsection "Macro Instruction 
Prototype." Unlike prototype statements, 
macro instructions can have omitted operands, 
and they can have consecutive commas or a 
comma at the end of the operand list. 



OMITTED OPERANDS 



If an operand that appears in the proto- 
type statement is omitted from the macro 
instruction, then the comma that would have 



A sublist may occur as the operand of a 
macro instruction. 

Sublists provide the programmer with a 
convenient way to refer to a collection of 
macro instruction operands as a single 
operand, or a single operand in a collec- 
tion of operands. 

A sublist consists of one or more oper- 
ands separated by commas and enclosed in 
paired parentheses. The entire sublist, 
including the parentheses, is considered to 
be one macro instruction operand. 

If a macro instruction is written in the 
alternate statement format, each operand of 
the sublist may be written on a separate 
line; the macro instruction may be written 
on as many lines as necessary. 



72 



If 6 PI is a symbolic parameter in a 
prototype statement, and the corresponding 
operand of a macro-instruction is a sub- 
list, then £Pl(n) may be used in a model 
statement to refer to the nth operand of 
the sublist, where n may have a value 
greater than or equal to 1. n may be 
specified as a decimal integer or any 
arithmetic expression allowed in a SETA 
instruction. (The SETA instruction is des- 
cribed in Section 9.) If the nth operand 
is omitted, then £P1 (n) would refer to a 
null character value. 

If the sublist notation is used but the 
operand is not a sublist, then £P1(1) 
refers to the operand and £P1(2), 
6 PI (3),... refer to a null character value. 
If an operand has the form ( ) , it is 
treated as a character string and not as a 
sublist. 

For example, consider the following 
macro-definition, macro-instruction, and 
generated statements. 

r t t T 

| Name | Operation! Operand | 



Header | 


MACRO 




Prototype | 


ADD 


£NUM, £REG,£AREA 


Model | 


L 


£REG,£NUM(1) 


Model | 


A 


£REG,£NUM(2) 


Model | 


A 


£REG, £NUM(3) 


Model | 


ST 


£REG,£AREA 


Trailer | 


MEND 




i- ^ 


1- 1 


| 


Macro | 


ADD 


(A,B,C) ,6, SUM 


Generated | 


L 


6, A 


Generated | 


A 


6,B 


Generated! 


A 


6,C 


Generated] 


ST 


6, SUM 



L J. X J 

The operand of the macro instruction 
that corresponds to symbolic parameter SNUM 
is a sublist. One of the operands in the 
sublist is referred to in the operand field 
of three of the model statements. For 
example, £NUM(1) refers to the first oper- 
and in the sublist corresponding to symbol- 
ic parameter £NUM. The first operand of 
the sublist is A. Therefore, A replaces 
SNUM(l) to form part of the generated 
statement. 



represents. The following example shows 
what would be generated if a period 
appeared between the left parenthesis and 
the last character of the symbolic parame- 
ter in the first model statement of the 
above example. 

r t t 1 

| Name | Operation | Operand | 

j. + ± ., 

Prototype! JADD | SNUM, £REG, £AREA | 

Model | |L | £REG,£NUM. (1) j 

|. + + ^ 

Macro | |ADD | (A,B,C) , 6, SUM | 
|. + + ., 

Generated! JL j 6, (A,B,C) (1) | 
l x i. J 

The symbolic parameter £NUM is used in 
the operand field of the model statement. 
The characters (A, B,C) of the macro- 
instruction correspond to £NUM. Since £NUM 
is immediately followed by a period, £NUM 
and the period are replaced by (A,B,C) . 
The period does not appear in the generated 
statement. The resulting generated 
statement is an invalid assembler language 
statement. 



INNER MACRO INSTRUCTIONS 

A macro -instruction may be used as a 
model statement in a macro definition. 
Macro instructions used as model statements 
are called inner macro instructions. 

A macro instruction that is not used as 
a model statement is referred to as an 
outer macro instruction. 

The rule for inner macro instruction 
parameters is the same as that for outer 
macro instructions. Any symbolic param- 
eters used in an inner macro instruction 
are replaced by the corresponding characters 
of the outer macro instruction. An operand 
of an outer macro instruction sublist cannot 
be passed as a sublist to an inner macro 
instruction. 

The macro definition corresponding to an 
inner macro instruction is used to generate 
the statements that replace the inner 
macro instruction. 



Note: When referring to an operand in a 
sublist, the left parenthesis of the sub- 
list notation must immediately follow the 
last character of the symbolic parameter, 
e.g., £NUM(1). A period should not be 
placed between the left parenthesis and the 
last character of the symbolic parameter. 

A period may be used between these two 
characters only when the programmer wants 
to concatenate the left parenthesis with 
the characters that the symbolic parameter 



The ADD macro instruction of the pre- 
vious example is used as an inner macro 
instruction in the following example. 

The inner macro instruction contains two 
symbolic parameters, £S and £T. The 
characters (X,Y,Z) and J of the macro 
instruction correspond to £S and £T, 
respectively. Therefore, these characters 
replace the symbolic parameters in the 
operand field of the inner macro 
instruction. 
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The assembler then uses the macro 
definition that corresponds to the inner 
macro instruction to generate statements to 
replace the inner macro instruction. The 
fourth through seventh generated statements 
have been generated for the inner macro 
instruction. 



Further relevant limitations and differen- 
ces between inner and outer macro instruct- 
ions will be covered under the pertinent 
sections on sequence symbols, attributes, 
etc. 

Note; An ampersand that is part of a 
symbolic parameter is not considered in 
determining whether a macro instruction 
operand contains an even number of consecu- 
tive ampersands. 



r t t 1 

| Name | Operation! Operand | 

j. _ + + ^ 



Header 


| MACRO 




Prototype 


JCOMP 


| SR1,£R2,6S,&T,SU 


Model 


|SR 


|SR1,SR2 


Model 


|C 


| SRI , ST 


Model 


|BNE 


|£U 


Inner 


|ADD 


| £S,12,ST 


Model 


SU |A 


| £R1 , 6T 


Trailer 


JMEND 






1 


__| 


Macro 


K JCOMP 


|10,11, (X,Y,Z) , J,K 




+ 


__ + 


Generated 


JSR 


|10,11 


Generated 


\c 


|10,J 


Generated 


|BNE 


|K 


Generated 


|L 


|12 f X 


Generated 


|A 


|i2,y 


Generated 


|A 


|12,Z 


Generated 


JST 


|12,J 


Generated 


K JA 


|10,J 




L J. 


J._ _ _ 



LEVELS OF MACRO INSTRUCTIONS 



A macro definition that corresponds to 
an outer macro instruction may contain any 
number of inner macro instructions. The 
outer macro instruction is called a first 
level macro instruction. Each of the inner 
macro instructions is called a second level 
macro instruction. 

The macro definition that corresponds to 
a second level macro instruction may con- 
tain any number of inner macro 
instructions. These macro instructions are 
called third level macro instructions, etc. 

The number of levels of macro 
instructions that may be used depends upon 
the complexity of the macro definition and 
the amount of storage available. 



74 



SECTION 9: HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 



The conditional assembly instructions 
allow the programmer to: (1) define and 
assign values to SET symbols that can be 
used to vary parts of generated statements, 
and (2) vary the sequence of generated 
statements. Thus, the programmer can use 
these instructions to generate many 
different sequences of statements from the 
same macro-definition. 

There are 13 conditional assembly 
instructions, 10 of which are described in 
this section. The other three conditional 
assembly instructions — GBLA, GBLB, and 
GBLC — are described in Section 10. The 
instructions described in this section are: 



LCLA SETA AIF 
LCLB SETB AGO 
LCLC SETC ACTR 



ANOP 



The primary use of the conditional 
assembly instructions is in macro- 
definitions. However, all of them may be 
used in an assembler language source 
program. 

Where the use of an instruction outside 
macro-definitions differs from its use 
within macro-definitions, the difference is 
described in the subsequent text. 

The LCLA, LCLB, and LCLC instructions 
may be used to define and assign initial 
values to SET symbols. 



SET SYMBOLS 



SET symbols are one type of variable 
symbol. The symbolic parameters discussed 
in Section 7 are another type of variable 
symbol. SET symbols differ from symbolic 
parameters in three ways: (1) where they 
can be used in an assembler language source 
program, (2) how they are assigned values, 
and (3) whether or not the values assigned 
to thern can be changed. 

Symbolic parameters can only be used in 
macro-definitions, whereas SET symbols can 
be used inside and outside macro- 
definitions. 

Symbolic parameters are assigned values 
when the programmer writes a macro- 
instruction, whereas SET symbols are 
assigned values when the programmer writes 
SETA, SETB, and SETC conditional assembly 
instructions . 

Each symbolic parameter is assigned a 
single value for one use of a macro- 
definition, whereas the values assigned to 
each SETA, SETB, and SETC symbol can change 
during one use of a macro- definition. 



Defining SET Symbols 



The SETA, SETB, and SETC instructions 
may be used to assign arithmetic, binary, 
and character values, respectively, to SET 
symbols. The SETB instruction is described 
after the SETA and SETC instructions, 
because the operand field of the SETB 
instruction is a combination of the operand 
fields of the SETA and SETC instructions. 



SET symbols must be defined by the 
programmer before they are used. When a 
SET symbol is defined it is assigned an 
initial value. SET symbols may be assigned 
new values by means of the SETA, SETB, and 
SETC instructions. A SET symbol is defined 
when it appears in the operand field of an 
LCLA, LCLB, or LCLC instruction. 



The AIF, AGO, and ANOP instructions may 
be used in conjunction with sequence sym- 
bols to vary the sequence in which state- 
ments are processed by the assembler. The 
programmer can test attributes assigned by 
the assembler to symbols or macro- 
instruction operands to determine which 
statements are to be processed. The ACTR 
instruction may be used to vary the maximum 
number of AIF and AGO branches. 

Examples illustrating the use of 
conditional assembly instruction are 
included* throughout this section. A chart 
summarizing the elements that can be used 
in each instruction appears at the end of 
this section. 



Using Variable Symbols 



The SETA, SETB, and SETC instructions 
may be used to change the values assigned 
to SETA, SETB, and SETC symbols, 
respectively. When a SET symbol appears in 
the name, operation, or operand field of a 
model statement, the current value of the 
SET symbol (i.e., the last value assigned 
to it) replaces the SET symbol in the 
statement. 

For example, if £A is a symbolic parame- 
ter, and the corresponding characters of 
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the macro-instruction are the symbol HERE, 
then HERE replaces each occurrence of SA in 
the macro-definition. However, if SA is a 
SET symbol, the value assigned to SA can be 
changed, and a different value can replace 
each occurrence of SA in the macro- 
definition. 

The same variable symbol may not be used 
as a symbolic parameter and as a SET symbol 
in the same macro- definition. 

The following illustrates this rule. 

r t t -i 

| Name (Operation | Operand | 

j. + _ + 1 

| S NAME | MOVE |STO,6FROM | 

L i X J 

If the statement above is a prototype 
statement, then SNAME, STO, and SFROM may 
not be used as SET symbols in the macro- 
definition. 

The same variable symbol may not be used 
as two different types of SET symbols in 
the same macro-definition. Similarly, the 
same variable symbol may not be used as two 
different types of SET symbols outside 
macro-definitions . 

For example, if SA is a SETA symbol in a 
macro-definition, it cannot be used as a 
SETC symbol in that definition. Similarly, 
if SA is a SETA symbol outside macro- 
definitions, it cannot be used as a SETC 
symbol outside macro-definitions. 

The same variable symbol may be used in 
two or more macro-definitions and outside 
macro-definitions. If such is the case, 
the variable symbol will be considered a 
different variable symbol each time it is 
used. 



For example, 
(either SET symbo 
in one macro-def 
a variable symbol 
symbolic paramet 
Similarly, if SA 
symbol or symbo 
definition, it ca 
outside macro-def 



if SA is a variable symbol 
1 or symbolic parameter) 
inition, it can be used as 
(either SET symbol or 
er) in another definition, 
is a variable symbol (SET 
lie parameter) in a rnacro- 
n be used as a SET symbol 
initions. 



All variable symbols may be concatenated 
with other characters in the same way that 
symbolic parameters may be concatenated 
with other characters. The rules for 
concatenating symbolic parameters with 
other characters are in Section 7 under the 
subsection "Symbolic Parameters." 

Variable symbols in macro-instructions 
are replaced by the values assigned to 
them, immediately prior to the start of 
processing the definition. If a SET symbol 



is used in the operand field of a macro- 
instruction, and the value assigned to the 
SET symbol is equivalent to the sublist 
notation, the operand is not considered a 
sublist. 

ATTRIBUTES 

The assembler assigns attributes to 
macro- instruction operands and to symbols 
in the program. These attributes may be 
referred to only in conditional assembly 
instructions or expressions. 

There are six kinds of attributes. They 
are: type, length, scaling, integer, 
count, and number. Each kind of attribute 
is discussed in the paragraphs that follow. 

If an outer macro- instruction operand is 
a symbol before substitution, then the 
attributes of the operand are the same as 
the corresponding attributes of the symbol. 
The symbol must appear in the name field of 
an assembler language statement or in the 
operand field of an EXTRN statement in the 
program. The statement must be outside 
macro-definitions and must not contain any 
variable symbols. 

If an inner macro- instruction operand is 
a symbolic parameter, then the attributes 
of the operand are the same as the attri- 
butes of the corresponding outer macro 
instruction operand. A symbol appearing as 
an inner macro instruction operand is not 
assigned the same attributes as the same 
symbol appearing as an outer macro instruc- 
tion operand. 

If a macro- instruction operand is a 
sublist, the programmer may refer to the 
attributes of either the sublist or each 
operand in the sublist. The type, length, 
scaling, and integer attributes of a 
sublist are the same as the corresponding 
attributes of the first operand in the 
sublist. 

All the attributes of macro-instruction 
operands may be referred to in conditional 
assembly instructions within macro- 
definitions. However, only the type, 
length, scaling, and integer attributes of 
symbols may be referred to in conditional 
assembly instructions outside macro- 
definitions. Symbols appearing in the name 
field of generated statements are not 
assigned attributes. 

Each attribute has a notation associated 
with it. The notations are: 



Attribute 


Notation 


Type 

Length 

Scaling 


L' 
S' 


Integer 
Count 


I' 


Number 


N' 
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The programmer may refer to an attribute G 
in the following ways: 

H 

1. In a statement that is outside macro 
definitions, he may write the notation K 
for the attribute immediately followed 

by a symbol. (e.g., T'NAME refers to L 
the type attribute of the symbol 
NAME.) P 

2. In a statement that is in a macro- q 
definition, he may write the notation 

for the attribute immediately followed R 
by a symbolic parameter. (e.g., 
L'SNAME refers to the length attribute s 
of the characters in the macro- 
instruction that correspond to v 
symbolic parameter SNAME; L* 6NAME(2) 
refers to the length attribute of the X 
second operand in the sublist that Y 
corresponds to symbolic parameter 
6NAME.). Z 



Fixed-point constant, explicit 

length. 

Half-word fixed-point constant, 

implied length, aligned. 

Floating-point constant, 

explicit length. 

Extended floating-point constant, 

implied length, aligned 

Packed decimal constant. 

Q-type address constant, implied 

length, aligned. 

A-, S-, Q-, V-, or Y-type address 

constant, explicit length. 

S-type address constant, 

implied length, aligned. 

V-type address constant, 

implied length, aligned. 

Hexadecimal constant. 

Y-type address constant, 

implied length, aligned. 

Zoned decimal constant. 



Type Attribute (T') 



The type attribute of a macro 
instruction operand, or a symbol is a 
letter. 

The following letters are used for 
symbols that name DC and DS statements and 
for outer macro instruction operands that 
are symbols that name DC or DS statements. 

A A-type address constant, 

implied length, aligned, (also in 

CXD statement) 
B Binary constant. 
C Character constant. 
D Long floating-point constant, 

implied length, aligned. 
E Short floating-point constant, 

implied length, aligned. 
F Full-word fixed- point constant, 

implied length, aligned. 



The following letters are used for sym- 
bols (and outer macro instruction operands 
that are symbols) that name statements 
other than DC or DS statements, or that 
appear in the operand field of an EXTRN 
statement. 

I Machine instruction 
J Control section name 
M Macro instruction 
T EXTRN symbol 
W CCW instruction 
$ WXTRN symbol 

The following letters are used for inner 
and outer macro instruction operands only. 

N Self-defining term 
Omitted operand 

The following letter is used for inner 
and outer macro instruction operands that 
cannot be assigned any of the above let- 
ters. This includes inner macro 
instruction operands that are symbols. 
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This letter is also assigned to symbols 
that name EQU and LTORG statements, to any 
symbols occurring more than once in the 
name field of source statements, and to all 
symbols naming statements with expressions 
as modifiers. 



U 



Undefined 



The attributes of A, B, C and D are 
undefined in the following example: 



| Name 
j. 

|A 
IB 
|C 
ID 



"T T 

| Operation | Operand 



| DC | 3FUAA-BB) '75' | 

| DC | (AA-BBJF'IS' | 

J DC J &X'l' | 

| DC J FL(3-2) •!' | 



After generation, this would result in 
MVC Z(L'Z),X 

Conditional assembly instructions must 

not refer to the lenqth attributes of 
symbols or macro instruction operands whose 
type attributes are the letters M, N, 0, T, 

U, W, or $. 

Scaling and integer attributes are pro- 
vided for symbols that name fixed- point, 
floating-point, and decimal fields. 

Fixed and Floating Point; The scaling 
attribute of a fixed-point or floating- 
point number is the value given by the 
scale modifier. The integer attribute is a 
function of the scale and length attributes 
of the number. 



The programmer may refer to a type 
attribute in the operand field of a SETC 
instruction, or in character relations in 
the operand fields of SETB or AIF 
instructions . 



Lenqth (L') t Scaling (S*), and Integer (I 1 ) 
Attributes 



The length, scaling, and integer attri- 
butes of macro instruction operands, and 
symbols are numeric values. 

The length attribute of a symbol (or of 
a macro instruction operand that is a 
symbol) is as described in Part I of this 
publication. The use of the length attribute 
of a symbol defined with a DC or DS with 
explicit length given by an expression is 
invalid. Reference to the length attribute 
of a variable symbol is illegal except for 
symbolic parameters in SETA, SETB and AIF 
statements. If the basic L 1 attribute is 
desired, it may be obtained as follows: 



&A 


SETC 


■Z' 


&B 


SETC 


i l i i i 




MVC 


&A. (&B&A) ,X 



Decimal: The scaling attribute of a 
decimal number is the number of decimal 
digits to the right of the decimal point. 
The integer attribute of a decimal number 
is the number of decimal digits to the left 
of the assumed decimal point after the 
number is assembled. 



Scaling and integer attributes are 
available for symbols and macro instruction 
operands only if their type attributes are 
H,F, and G, (fixed point); D,E,L, and K 
(floating point) ; or P and Z (decimal) . 



The programmer may refer to the length, 
scaling, and integer attributes in the 
operand field of a SETA instruction, or in 
arithmetic relations in the operand fields 
of SETB or AIF instructions. 



Count Attribute (K') 



The programmer may refer to the count 
attribute of macro instruction operands 
only. 
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The value of the count attribute is 
equal to the number of characters in the 
macro instruction operand. It includes 
all characters in the operand, but does 
not include the delimiting commas. The 
count attribute of an omitted operand is 
zero. These rules are illustrated by the 
following examples: 



Operand 

ALPHA 

( JUNE , JUL Y , AUGU ST ) 
2(10,12) 
A(2) 

'A 1 'B' 



Count Attribute 

5 
18 
8 
4 
6 
3 
2 



The following examples 
rule. 



illustrate this 



(A f B,C,D f E) 
(A,,C,D,E) 
(A,B,C,D) 
(,B f C,D,E) 
(A,B,C,D, ) 
(A,B,C,D, ,) 



operands 
operands 
operands 
operands 
operands 
operands 



If the macro- instruct ion operand is not 
a sublist, the number attribute is one. If 
the macro instruction operand is omitted, 
the number attribute is zero. 

The programmer may refer to the number 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc- 
tions that are part of a macro definition. 



If a macro instruction operand contains 
variable symbols, the characters that 
replace the variable symbols, rather than 
the variable symbols, are used to determine 
the count attribute. 



Assigning Attributes to Symbols 



The integer attribute is computed from 
the length and scaling attributes. 



The programmer may refer to the count 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc- 
tions that are part of a macro- definition. 



Fixed Point; The integer attribute of a 
fixed-point number is equal to eight times 
the length attribute of the number minus 
the scaling attribute minus one; i.e., 
I'=8*L'-S'-1. 



Number Attribute ( N • ) 



Th.e programmer may refer to the number 
attribute of macro instruction operands 
only . 



Each of the following statements defines 
a fixed- point field. The length attribute 
of HALFCON is 2, the scaling attribute is 
6, and the integer attribute is 9. The 
length attribute of ONECON is 4, the scal- 
ing attribute is 8, and the integer attri- 
bute is 23. 



The number attribute is a value equal to 
the number of operands in an operand sub- 
list. The number of operands in an operand 
sublist is equal to one plus the number of 
commas that indicate the end of an operand 
in the sublist. 



r t t T 

| Name | Operation | Operand | 

,. 1 1 H 

j HALFCON J DC |HS6'-25.93' j 

JONECON |DC |FS8 , 100.3E-2' j 

I J. J. J 
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Floating Point ; The integer attribute of a 
Type D or E floating-point number is equal 
to two times the difference between the 
length attribute of the number and one, 
minus the scaling attribute; i.e., I'=2* 
(L»-l)-s'. 

Because of its low order characteristic, 
the integer attribute of a Type L constant 
with a length greater than 8 bytes is two 
less than the value indicated in the formula 
above. The integer attribute of a Type L 
constant with a length of 8 bytes or less 
is the same as the value indicated in the 
formula above. 

Each of the following statements defines 
a floating-point field. The length attri- 
bute of SHORT is 4, the scaling attribute 
is 2, and the integer attribute is 4. The 
length attribute of LONG is 8, the scaling 
attribute is 5, and the integer attribute 
is 9. 

r t t 1 

| Name | Operation | Operand | 

j. 1 + 1 

j SHORT j DC j ES2' 46.415' j 

| LONG | DC |DS5'-3.729* j 

L J. _i J 



SEQUENCE SYMBOLS 



The name field of a statement may con- 
tain a sequence symbol. Sequence symbols 
provide the programmer with the ability to 
vary the sequence in which statements are 
processed by the assembler. 



A sequence symbol is used in the operand 
field of an AIF or AGO statement to refer 
to the statement named by the sequence 
symbol. 

A sequence symbol is considered to be 
local to a macro definition. 

A sequence symbol may be used in the 
name field of any statement that does not 
contain a symbol or SET symbol except a 
prototype statement, a MACRO, LCLA, LCLB, 
LCLC, GBLA, GBLB, GBLC, ACTR, ICTL, ISEQ, 
or COPY instruction. 



A sequence symbol consists of a period 
followed by one through seven letters 
and/or digits, the first of which must be a 
letter. 



Decimal: The integer attribute of a packed 
decimal number is equal to two times the 
length attribute of the number minus the 
scaling attribute minus one; i.e., 
I'=2*L , -S'-1. The integer attribute of a 
zoned decimal number is equal to the dif- 
ference between the length attribute and 
the scaling attribute; i.e., I , =L'-S'. 

Each of the following statements defines 
a decimal field. The length attribute of 
FIRST is 2, the scaling attribute is 2, and 
the integer attribute is 1. The length 
attribute of SECOND is 3, the scaling 
attribute is 0, and the integer attribute 
is 3. The length attribute of THIRD is 4, 
the scaling attribute is 2, and the integer 
attribute is 2. The length attribute of 
FOURTH is 3, the scaling attribute is 2, 
and the integer attribute is 3. 



The following are valid sequence sym- 
bols : 

.READER .A23456 
.LOOP2 .X4F2 
.N . S4 



The 
bols: 



following are invalid sequence sym- 



CARDAREA (first character is not 

a period) 
.246B (first character after 

period is not a letter) 
.AREA2456 (more than seven characters 

after period) 
. BCD%84 (contains a special character 

other than initial period) 
.IN AREA (contains a special 

character, i.e., blank, 

other than initial period) 



r T T 

| Name | Operation | Operand 
j. 1 

j FIRST j DC 
| SECOND | DC 
j THIRD j DC 
| FOURTH j DC 
L _X 



Ip'+i^s* 

|Z'-543' 

|Z»79.68' 

|P'79.68' 



If a sequence symbol appears in the name 
field of a macro-instruction, and the cor- 
responding prototype statement contains a 
symbolic parameter in the name field, the 
sequence symbol does not replace the sym- 
bolic parameter wherever it is used in the 
macro-definition. 
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The following example illustrates this 
rule. 





r 

| Name 


| Operation 


| Operand 

j. _ 


1 
J 




r - - 


t ~ ~ 
| MACRO 


T 

1 




1 


| 6 NAME 


| MOVE 


|6TO,SFROM 




2 


| 6 NAME 


|ST 
|L 
JST 
|L 

| MEND 


| 2 , SAVEAREA 

|2, SFROM 

|2,STO 

| 2 , SAVEAREA 

1 


_J 


3 


r 

j . SYM 


t ~ ~ 
JMOVE 


|FIELDA,FIELDB 


J 


H 


r~ 


t ~ — 
|ST 

|L 

JST 

|L 


| 2 , SAVEAREA 
|2,FIELDB 
|2,FIELDA 
j 2, SAVEAREA 















All LCLA, LCLB, or LCLC instructions in 
a macro definition must appear immediately 
after the prototype statement and GBLA, 
GBLB or GBLC instructions. All LCLA, LCLB, 
or LCLC instructions outside macro 
definitions must appear after all macro 
definitions in the source program, after 
all GBLA, GBLB, and GBLC instructions 
outside macro definitions, before all 
conditional assembly instructions , and 
PUNCH and REPRO statements outside macro 
definitions, and before the first con- 
trol section of the program. 



SETA — SET ARITHMETIC 



The SETA instruction may be used to 
assign an arithmetic value to a SETA sym- 
bol. The format of this instruction is: 



The symbolic parameter SNAME is used in 
the name field of the prototype statement 
(statement 1) and the first model statement 
(statement 2). In the macro- instruction 
(statement 3) a sequence symbol (.SYM) 
corresponds to the symbolic parameter 
6NAME. SNAME is not replaced by .SYM, and, 
therefore, the generated statement 
(statement 4) does not contain an entry in 
the name field. 



LCLA, LCLB, LCLC — DEFINE LOCAL SET SYMBOLS 



The format of these instructions is: 



r t 

| Name | Operation 



j Operand 



J Blank 


| LCLA, 


|One or more variable | 




| LCLB, or 


| symbols, that are | 




|LCLC 

1 

1 


|to be used as SET | 
j symbols, separated | 
j by commas j 






_ X _ _ J 



r t t 1 

| Name | Operation | Operand j 

|. + x 4 

| A SETA | SETA | An arithmetic | 
| symbol j J expression j 

L X X J 



The expression in the operand field is 
evaluated as a signed 32-bit arithmetic 
value which is assigned to the SETA symbol 
in the name field. The minimum and maximum 
allowable values of the expression are -2 31 
and +2 3i -l, respectively. 

The expression may consist of one term 
or an arithmetic combination of terms. The 
terms that may be used alone or in combina- 
tion with each other are self-defining 
terms, variable symbols, and the length, 
scaling, integer, count, and number attri- 
butes. Self -defining terms are described 
in Part I of this publication. 

Note: A SETC variable symbol may appear in 
a SETA expression only if the value of the 
SETC variable is one to eight decimal 
digits. The decimal digits will be con- 
verted to a positive arithmetic value. 



The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to SETA, SETB, and SETC symbols, 
respectively. The SETA, SETB, and SETC 
symbols are assigned the initial values of 
0, 0, and null character value, respective- 
ly- 

The programmer should not define any SET 
symbol whose first four characters are 
&SYS. 



The arithmetic operators that may be 
used to combine the terms of an expression 
are + (addition), - (subtraction), 
* (multiplication) , and / (division) . 

An expression may not contain two terms 
or two operators in succession, nor may it 
begin with an operator. 

The following are valid operand fields 
of SETA instructions: 
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SAREA+X'2D' 
6 BETA* 10 
L*£HERE+32 



I'gN/25 

SEXIT-S* 6ENTRY+1 

29 



The following are invalid operand fields 
of SETA instructions: 



The parenthesized portion or portions of 
an arithmetic expression are evaluated 
before the rest of the terms in the expres- 
sion are evaluated. If a sequence of 
parenthesized terms appears within another 
parenthesized sequence, the innermost 
sequence is evaluated first. 



SAREAX'C* (two terms in succession) 
SFIELD+- (two operators in succession) 
-6DELTA+2 (begins with an operator) 
* + 32 (begins with an operator; 

two operators in succession) 
NAME/15 (NAME is not a valid term) 



Evaluation of Arithmetic Expressions 



The procedure used to evaluate the 
arithmetic expression in the operand field 
of a SETA instruction is the same as that 
used to evaluate arithmetic expressions in 
assembler language statements. The only 
difference between the two types of arith- 
metic expressions is the terms that are 
allowed in each expression. 



The 
used: 



following evaluation procedure is 



1. Each term is given its numerical 
value. 

2. The arithmetic operations are per- 
formed moving from left to right. 
However, multiplication and/or divi- 
sion are performed before addition and 
subtraction. 

3. The computed result is the value 
assigned to the SETA symbol in the 
name field. 

The arithmetic expression in the operand 
field of a SETA instruction may contain one 
or more sequences of arithmetically com- 
bined terms that are enclosed in parenthe- 
ses. A sequence of parenthesized terms may 
appear within another parenthesized 
sequence. Only five levels of parentheses 
are allowed and an expression may not 
consist of more than 16 terms. Parentheses 
required for sublist notation, substring 
notation, and subscript notation count 
toward this limit. 

The following are examples of SETA 
instruction operand fields that contain 
parenthesized sequences of terms. 

(L'SHERE+32)*29 

SAREA+X * 2D ' / ( SEXIT-S ' SENTRY+1 ) 

SBETA*10*(I'SN/25/ (SEXIT-S* SENTRY+1) ) 



Using SETA Symbols 



The arithmetic value assigned to a SETA 
symbol is substituted for the SETA symbol 
when it is used in an arithmetic expres- 
sion. If the SETA symbol is not used in an 
arithmetic expression, the arithmetic value 
is converted to an unsigned integer, with 
leading zeros removed. If the value is 
zero, it is converted to a single zero. 



The following example 
rule: 



illustrates this 



|Name 

L 


| Operation 
x _ 


| Operand 

± _ 


r 


T 

j MACRO 


T 


| SNAME 


|MOVE 


| 6TO, 6 FROM 




|LCLA 


|SA,SB, SC,SD 


|SA 


|SETA 


1 10 


| SB 


|SETA 


1 12 


|SC 


|SETA 


| SA-SB 


|SD 


| SETA 


|SA+SC 


| SNAME 


|ST 


| 2, SAVEAREA 




|L 


|2,SFROMSC 




|ST 


| 2 # STOSD 




|L 


| 2„ SAVEAREA 




|MEND 




H- 

| HERE 

L _ 


-+ 

|MOVE 

4- — — 


_ + 

|FIELDA,FIELDB 

4— — _ _ 


r 

JHERE 


T 

JST 


t 

j 2, SAVEAREA 




|L 


| 2„ FIELDB2 




|ST 


|2,FIELDA8 




|L 


| 2, SAVEAREA 



Statements 1 and 2 assign to the SETA 
symbols SA and SB the arithmetic values +10 
and +12, respectively. Therefore, state- 
ment 3 assigns the SETA symbol SC the 
arithmetic value -2. When SC is used in 
statement 5, the arithmetic value -2 is 
converted to the unsigned integer 2. When 
SC is used in statement 4, however, the 
arithmetic value -2 is used. Therefore, SD 
is assigned the arithmetic value +8. When 
SD is used in statement 6, the arithmetic 
value +8 is converted to the unsigned 
integer 8 . 

The following example shows how the 
value assigned to a SETA symbol may be 
changed in a macro definition. 
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r t t 1 

| Name | Operation J Operand | 

j. + + j, 





| MACRO 




6 NAME 


|MOVE 


|6TO,6FROM 




|LCLA 


|SA 


SA 


|SETA 


|5 


SNAME 


|ST 


| 2 # SAVEAREA 




|L 


| 2, SFROM&A 


SA 


|SETA 


|8 




|ST 


|2,STOgA 




|L 


| 2 € SAVEAREA 




|MEND 






j. _ 


_ X _ _ _ 




T 


T 


HERE 


|MOVE 

4- - 


|FIELDA f FIELDB 
X - — 




T 


t 


HERE 


|ST 


| 2, SAVEAREA 




|L 


| 2, FIELDB5 




|ST 


| 2 # FIELDA8 




l L 


| 2, SAVEAREA 



L X X J 

Statement 1 assigns the arithmetic value 
+5 to SETA symbol SA. In statement 2, 6 A 
is converted to the unsigned integer 5. 
Statement 3 assigns the arithmetic value +8 
to SA. In statement 4, therefore, SA is 
converted to the unsigned integer 8, 
instead of 5. 

A SETA symbol may be used with a symbol- 
ic parameter to refer to an operand in an 
operand sublist*. If a SETA symbol is used 
for this purpose it must have been assigned 
a positive value. 

Any expression that may be used in the 
operand field of a SETA instruction may be 
used to refer to an operand in an operand 
sublist,. 

Sublists are described in Section 8 
under "Operand Sublists." 

The following macro definition may be 
used to add the last operand in an operand 
sublist to the first operand in an operand 
sublist and store the result at the first 
operand. A sample macro- instruction and 
generated statements follow the macro 
definition. 

r t t 1 

| Name | Operation | Operand | 

|. X x _ .| 



| MACRO 




|ADDX 


| S NUMBER, SREG 


|LCLA 


| SLAST 


SLAST |SETA 


|N*£ NUMBER 


|L 


|SREG, 6NUMBER(1) 


|A 


| 6REG, &NUMBERULAST) 


|ST 


|6REG,6NUMBER(1) 


|MEND 
— X — 


X _ _ 


T ■ 


T 


|ADDX 

X — — 


| (A,B,C,D,E) ,3 

X — — _ 


T 


— t 


|L 


|3,A 


|A 


|3 f E 


|ST 


|3,A 


X 


x _ _ 



6NUMBER is the first symbolic parameter 
in the operand field of the prototype 
statement (statement 1). The corresponding 
characters, (A,B,C,D,E), of the macro- 
instruction (statement 4) are a sublist. 
Statement 2 assigns to 6LAST the arithmetic 
value +5, which is equal to the number of 
operands in the sublist. Therefore, in 
statement 3, SNUMBERULAST) is replaced by 
the fifth operand of the sublist. 

SETC — SET CHARACTER 



The SETC instruction is used to assign a 
character value to a SETC symbol. The 
format of this instruction is: 

r t t 1 

| Name | Operation | Operand | 

,. x __x ., 

| A SETC | SETC | One operand, of | 
| symbol j | the form described j 
| j | below j 

i x x j 

The operand field may consist of the 
type attribute, a character expression, a 
substring notation, or a concatenation of 
substring notations and character 
expressions. A SETA symbol may appear in 
the operand of a SETC statement. The 
result is the character representation of 
the decimal value, unsigned, with leading 
zeros removed. If the value is zero, one 
decimal zero is used. 

Type Attribute 

The character value assigned to a SETC 
symbol may be a type attribute. If the 
type attribute is used, it must appear 
alone in the operand field. The following 
example assigns to the SETC symbol STYPE 
the letter that is the type attribute of 
the macro instruction operand that corre- 
sponds to the symbolic parameter 6ABC. 

r T T -, 

| Name | Operation | Operand | 

j. x x -j 

&TYPE j SETC |T'&ABC | 

L X X J 



Character Expression 

A character expression consists of any 
combination of (up to 255) characters 
enclosed in apostrophes. 

The first eight characters in a charac- 
ter value enclosed in apostrophes in the 
operand field are assigned to the SETC 
symbol in the name field. The maximum size 
character value that can be assigned to a 
SETC symbol is eight characters. 

Evaluation of Character Expressions: The 
following statement assigns the character 
value AB%4 to the SETC symbol 6ALPHA: 
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r t t 1 

| Name J Operation | Operand | 

■I. — _ — + + ^ 

I 6ALPHA j SETC j * AB%4 ' j 

L X X . J 

More than one character expression may 
be concatenated into a single character 
expression by placing a period between the 
terminating apostrophe of one character 
expression and the opening apostrophe of 
the next character expression. For exam- 
ple, either of the following statements may 
be used to assign the character value 
ABCDEF to the SETC symbol 6 BETA. 

r t t 1 

| Name | Operation | Operand | 

,. + + _ .j 

j & BETA j SETC j' ABCDEF' j 

| &BETA | SETC j 'ABC' . 'DEF' | 

L X X J 

Two apostrophes must be used to rep- 
resent an apostrophe that is part of a 
character expression. 

The following statement assigns the 
character value L'SYM30L to the SETC symbol 
£ LENGTH. 

r t t ■ i 

| Name | Operation | Operand | 

y x + _ H 

| & LENGTH j SETC j'L" SYMBOL' j 

L X X , J 

Variable symbols may be concatenated 
with other characters in the operand field 
of a SETC instruction according to the 
general rules for concatenating symbolic 
parameters with other characters (see Sec- 
tion 7) . 

If &ALPHA has been assigned the charac- 
ter value AB%4, the following statement may 
be used to assign the character value 
ABX4RST to the variable symbol 6 GAMMA. 



r — t t 1 

| Name | Operation | Operand | 

|. + + .j 

l&GAMMA | SETC | ' S ALPHA. RST' | 

L X X J 

Two ampersands must be used to represent 
an ampersand that is not part of a variable 
symbol. Both ampersands become part of the 
character value assigned to the SETC sym- 
bol. They are not replaced by a single 
ampersand. 

The following statement assigns the 
character value HALFS& to the SETC symbol 
SAND. 



r t " t 1 

| Name | Operation (Operand | 

J. x x _ -I 

j SAND j SETC j'HALFSS* j 

L X X - J 



Substring Notation 

The character value assigned to a SETC 
symbol may be a substring character value. 
Substring character values permit the pro- 
grammer to assign part of a character value 
to a SETC symbol. 

If the programmer wants to assign part 
of a character value to a SETC symbol, he 
must indicate to the assembler in the 
operand field of a SETC instruction: (1) 
the character value itself, and (2) the 
part of the character value he wants to 
assign to the SETC symbol. The combination 
of (1) and (2) in the operand field of a 
SETC instruction is called a substring 
notation. The character value that is 
assigned to the SETC symbol in the name 
field is called a substring character 
value. 

Substring notation consists of a charac- 
ter expression, immediately followed by two 
arithmetic expressions that are separated 
from each other by a comma and are enclosed 
in parentheses. Each arithmetic expression 
may be any expression that is allowed in 
the operand field of a SETA instruction. 

The first expression indicates the first 
character in the character expression that 
is to be assigned to the SETC symbol in the 
name field. The second expression indi- 
cates the number of consecutive characters 
in the character expression (starting with 
the character indicated by the first 
expression) that are to be assigned to the 
SETC symbol. If a substring asks for more 
characters than are in the character string 
only the characters in the string will be 
assigned. 

The maximum size substring character 
value that can be assigned to a SETC symbol 
is eight characters. The maximum size 
character expression the substring charac- 
ter value can be chosen from is 255 charac- 
ters. If a value greater than 8 is speci- 
fied, the leftmost 8 characters will be 
used. 



The 
tions : 



following are valid substring nota- 



•£ALPHA' (2,5) 
*AB%4' (SAREA+2,1) 
' &ALPHA.RST' (6,6A) 
'ABC&GAMMA' UA,SAREA+2) 

The following are invalid substring 
notations: 

* &BETA' (4,6) 

(blanks between character value 
and arithmetic expressions) 
'L' 'SYMBOL' (142-SXYZ) 

(only one arithmetic expression) 
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'AB%4SALPHA' (8 SFIELD+2) 

(arithmetic expressions 
not separated by a comma) 
' BETA '4,6 

(arithmetic expressions 

not enclosed in parentheses) 

Using SETC Symbols 



The character value assigned to a SETC 
symbol is substituted for the SETC symbol 
when it is used in the name, operation, or 
operand field of a statement. 

For example, consider the following 
macro-definition, macro instruction, and 
generated statements. 



Name 



'T " T 

| Oper at ion | Ope rand 



i- 


"+ 

| MACRO 


+ 


| SNAME 


|MOVE 


| STO, & FROM 




|LCLC 


| SPREFIX 


| SPREFIX 


|SETC 


| 'FIELD' 


| SNAME 


|ST 


| 2 , SAVEAREA 




|L 


|2,SPREFIXSFR0M 




|ST 


|2,£PREFIX£TO 




|L 


| 2 , SAVEAREA 


L_ _ 


|MEND 
j. 


X — 


|HERE 

L 


t 

|MOVE 
i 


t 
|A, B 

i 


r 

|HERE 


t 

|ST 


t 

| 2, SAVEAREA 




|L 


|2,FIELDB 




|ST 


|2,FIELDA 




|L 


| 2, SAVEAREA 



L X X J 

Statement 1 assigns the character value 
FIELD to the SETC symbol SPREFIX. In 
statements 2 and 3, SPREFIX is replaced by 
FIELD. 



Statement 1 assigns the character value 
FIELD to the SETC symbol SPREFIX. There- 
fore, SPREFIX is replaced by FIELD in 
statement 2 . Statement 3 assigns the char- 
acter value AREA to SPREFIX. Therefore, 
SPREFIX is replaced by AREA, instead of 
FIELD, in statement 4. 

The following example illustrates the 
use of a substring notation as the operand 
field of a SETC instruction. 



JName 



j Operation | Operand 



L + + ., 





| MACRO 




6 NAME 


|MOVE 


| STO,SFROM 




|LCLC 


| SPREFIX 


SPREFIX 


|SETC 


| 'STO' (1,5) 


SNAME 


|ST 


| 2 , SAVEAREA 




|L 


|2,SPREFIX6FROM 




|ST 


| 2 , STO 




|L 


| 2 , SAVEAREA 




|MEND 






j. 










HERE 


| MOVE 


|FIELDA,B 






t 


HERE 


|ST 


| 2 , SAVEAREA 




|L 


|2,FIELDB 




|ST 


|2,FIELDA 




|L 


| 2 , SAVEAREA 



L X X j 



Statement 1 assigns the substring char- 
acter value FIELD (the first five charac- 
ters corresponding to symbolic parameter 
STO) to the SETC symbol SPREFIX. There- 
fore, FIELD replaces SPREFIX in statement 
2. 



The following example shows how the 
value assigned to a SETC symbol may be 
changed in a macro definition. 



I Name 



| Operation j Operand 



1- 


_X 

| MACRO 


X 


| SNAME 


|MOVE 


| STO, 6 FROM 




|LCLC 


| SPREFIX 


| SPREFIX 


|SETC 


|* FIELD' 


| &NAME 


|ST 


| 2 , SAVEAREA 




|L 


|2,SPREFIXSFROM 


| SPREFIX 


|SETC 


| ' AREA* 




|ST 


|2,SPREFIXST0 




|L 


| 2, SAVEAREA 




|MEND 




L 


j. 


i 


|HERE 

L _ 


T 

| MOVE 

i 


T 

|A,B 

j. 


|HERE 


T 

|ST 


T 

| 2, SAVEAREA 




|L 


|2,FIELDB 




|ST 


|2,AREAA 




|L 


| 2 , SAVEAREA 



Note : It is not possible, by specifying 
a string of values separated by commas 
as the operand of a SETC instruction and 
then using the SETC symbol as an operand 
in the macro call, to pass a string of 
values as parameters in a macro instruc- 
tion. If you attempt to do this, the 
operand of the SETC instruction will be 
passed to the macro instruction as one 
parameter, not as a list of parameters. 
If the SETC operand is a sublist, it 
will also be passed to the macro 
instruction as one parameter. 

Concatentating Substring Notations and 
Character Expressions; Substring notations 
may be concatenated with character expres- 
sions in the operand field of a SETC 



L X X J 



Section 9: How to Write Conditional Assembly Instructions 85 



instruction. If a substring notation fol- 
lows a character expression, the two may be 
concatenated by placing a period between 
the terminating apostrophe of the character 
expression and the opening apostrophe of 
the substring notation. 

For example, if SALPHA has been assigned 
the character value AB%4, and 6 BETA has 
been assigned the character value ABCDEF, 
then the following statement assigns &GAMMA 
the character value AB%4BCD. 



r t t 1 

(Name j Operation | Operand | 

j. x + 1 

j 6GAMMA j SETC j ' SALPHA' . ' SBETA' ( 2 , 3) j 
l X JL J 



If a substring notation precedes a char- 
acter expression or another substring nota- 
tion, the two may be concatenated by writ- 
ing the opening apostrophe of the second 
item immediately after the closing paren- 
thesis of the substring notation. 

The programmer may optionally place a 
period between the closing parenthesis of a 
substring notation and the opening apos- 
trophe of the next item in the operand 
field. 

If S ALPHA has been assigned the charac- 
ter value AB%4, and SABC has been assigned 
the character value 5RS, either of the 
following statements may be used to assign 
6 WORD the character value AB%45RS. 



r t t 1 

| Name | Operation | Operand | 

|. x x . ^ 

j SWORD JSETC j ' gALPHA' (1,4) 'SABC' j 
| SWORD JSETC | ' SALPHA* (1,4) 'SABC' (1,3) | 
I X X J 



If a SETC symbol is used in the operand 
field of a SETA instruction, the character 
value assigned to the SETC symbol must be 
one to eight decimal digits. 

If a SETA symbol is used in the operand 
field of a SETC statement, the arithmetic 
value is converted to an unsigned integer 
with leading zeros removed. If the value 
is zero, it is converted to a single zero. 



| Name 

,. x x .j 

| A SETB 
j symbol 



j Operation j Operand 
.x x- 

ISETB | A or a 1 enclosed or I 
[not enclosed in paren- 
| theses, or a logical 
j expression enclosed 
jin parentheses 
l j x J 



The operand field may contain a or a 1 
or a logical expression enclosed in paren- 
theses. A logical expression is evaluated 
to determine if it is true or false; the 
SETB symbol in the name field is then 
assigned the binary value 1 or corres- 
ponding to true or false, respectively. 

A logical expression consists of one 
term or a logical combination of terms. 
The terms that may be used alone or in 
combination with each other are arithmetic 
relations, character relations, and SETB 
symbols. The logical operators used to 
combine the terms of an expression are AND, 
OR, and NOT. 

An expression may not contain two terms 
in succession. A logical expression may 
contain two operators in succession only if 
the first operator is either AND or OR and 
the second operator is NOT. A logical 
expression may begin with the operator NOT. 
It may not begin with the operators AND or 
OR. 

An arithmetic relation consists of two 
arithmetic expressions connected by a rela- 
tional operator. A character relation con- 
sists of two character values connected by 
a relational operator. The relational 
operators are EQ (equal) , NE (not equal) , 
LT (less than), GT (greater than), LE (less 
than or equal), and GE (greater than or 
equal) . 

Any expression that may be used in the 
operand field of a SETA instruction, may be 
used as an arithmetic expression in the 
operand field of a SETB instruction. Any- 
thing that may be used in the operand field 
of a SETC instruction may be used as a 
character value in the operand field of a 
SETB instruction. This includes substring 
and type attribute notations. The maximum 
size of the character values that can be 
compared is 255 characters. If the two 
character values are of unequal size, then 
the smaller one will always compare less 
than the larger one. 



SETB — SET BINARY 



The SETB instruction may be used to 
assign the binary value or 1 to a SETB 
symbol. The format of this instruction is: 



The relational and logical operators 
must be immediately preceded and followed 
by at least one blank or other special 
character. Each relation may or may not be 
enclosed in parentheses. If a relation is 
not enclosed in parentheses, it must be 
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separated from the logical operators by at 
least one blank or other special character. 



The following are valid operand fields 
of SETB instructions: 



(SAREA+2 GT 29) 

('AB%4' EQ 'SALPHA') 

(T'SABC NE T'SXYZ) 

(T'SP12 EQ 'F') 

UAREA+2 GT 29 OR SB) 

(NOT SB AND SAREA+X'2D' GT 29) 

CSC'EQ'MB') 

(0) 



The following are invalid operand fields 
of SETB instructions: 



SB 



(not enclosed in parentheses) 



(T'SP12 EQ 'F' SB) 

(two terms in succession) 
CAB%4' EQ 'ALPHA' NOT SB) 

(the NOT operator must be 
preceded by AND or OR) 
(AND T*SP12 EQ 'F') 

(expression begins with AND) 



Evaluation of Logical Expressions 

The following procedure is used to 
evaluate a logical expression in the oper- 
and field of a SETB instruction: 

1. Each term (i.e., arithmetic relation, 
character relation, or SETB symbol) is 
evaluated and given its logical value 
(true or false) . 

2. The logical operations are performed 
moving from left to right. However, 
NOTs are performed before ANDs, and 
ANDs are performed before ORs. 

3. The computed result is the value 
assigned to the SETB symbol in the 
name field. 

The logical expression in the operand 
field of a SETB instruction may contain one 
or more sequences of logically combined 
terms that are enclosed in parentheses. A 
sequence of parenthesized terms may appear 
within another parenthesized sequence. 

The following are examples of SETB 
instruction operand fields that contain 
parenthesized sequences of terms. 



(NOT (SB AND SAREA+X f 2D' GT 29)) 
(SB AND (T'SP12 EQ 'F' OR SB)) 

The parenthesized portion or portions of 
a logical expression are evaluated before 
the rest of the terms in the expression are 
evaluated. If a sequence of parenthesized 
terms appears within another parenthesized 
sequence, the innermost sequence is evalu- 
ated first. Five levels of parentheses are 
permissible. 



Using SETB Symbols 



The logical value assigned to a SETB 
symbol is used for the SETB symbol appear- 
ing in the operand field of an AIF instruc- 
tion or another SETB instruction. 

If a SETB symbol is used in the operand 
field of a SETA instruction, or in arith- 
metic relations in the operand fields of 
AIF and SETB instructions, the binary 
values 1 (true) and (false) are converted 
to the arithmetic values +1 and +0, respec- 
tively. 

If a SETB symbol is used in the operand 
field of a SETC instruction, in character 
relations in the operand fields of AIF and 
SETB instructions, or in any other state- 
ment, the binary values 1 (true) and 
(false) , are converted to the character 
values 1 and 0, respectively. 

The following example illustrates these 
rules. It is assumed that L'STO EQ U is 
true, and S'STO EQ is false. 



JName 

L 


j Operation 
j. 


| Operand 

X 


r 


T 

j MACRO 


T 


ISNAME 


JMOVE 


| STO, SFROM 




JLCLA 


|SA1 




JLCLB 


|SB1,SB2 




|LCLC 


j SCI 


| SB1 


j SETB 


| (L'STO EQ 4) 


|SB2 


JSETB 


j (S'STO EQ 0) 


|SA1 


JSETA 


|SB1 


jsci 


JSETC 


| *SB2' 




j ST 


| 2 , SAVEAREA 




|L 


j 2, SFROMSAl 




'|ST 


|2 # 6T0SC1 




|L 


| 2, SAVEAREA 


L _ 


j MEND 
j. _ 


4. 


r 


t 


T 


1 HERE 

L 


JMOVE 


|FIELDA,FIELDB 

X 


r — 


T 


T 


JHERE 


j ST 


| 2 # SAVEAREA 




|L 


| 2, FIELDB1 




|ST 


| 2, FIELDAO 




JL 


j 2, SAVEAREA 



L J. X J 
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Because the operand field of statement 1 
is true, 6B1 is assigned the binary value 
1. Therefore, the arithmetic value +1 is 
substituted for SB1 in statement 3. 
Because the operand field of statement 2 is 
false, SB2 is assigned the binary value 0. 
Therefore, the character value is substi- 
tuted for SB2 in statement 4. 



AIF — CONDITIONAL BRANCH 



The AIF instruction is used to condi- 
tionally alter the sequence in which source 
program statements or macro-definition 
statements are processed by the assembler. 
The assembler assigns a maximum count of 
4 096 AIF and AGO branches that may be 
executed in the source program or in a 
macro-definition. When a macro-definition 
calls an inner macro-definition, the cur- 
rent value of the count is saved and a new 
count of 409 6 is set up for the inner 
macro-definition. When processing in the 
inner definition is completed and a return 
is made to the higher definition, the saved 
count is restored. The format of this 
instruction is: 



AIF instruction appears outside macro- 
definitions, then the sequence symbol in 
the operand field must appear in the name 
field of a statement outside macro- 
definitions . 



The following are valid operand fields 
of AIF instructions: 

( &AREA+X '2D' GT 29). READER 
(T'&P12 EQ *F'). THERE 
C&FIELD3' EQ ' *) .N03 

The following are invalid operand fields 
of AIF instructions: 



(T'SABC NE T'SXYZ) 

.X4F2 

(T'SABC NE T'SXYZ) 



(no sequence symbol) 
(no logical expression) 
.X4F2 
(blanks between logical 
expression and se- 
quence symbol) 



The following macro-definition may be 
used to generate the statements needed to 
move a full-word fixed-point number from 
one storage area to another. The 
statements will be generated only if the 
type attribute of both storage areas is the 
letter F. 



Name 



H 



j Operation j Operand 



| A se- 

I quence | 

| symbol orj 

I blank j 

I I 

t x 



JAIF 



| A logical expression 
j enclosed in paren- 
| theses,, immediately 
j followed by a 
j sequence symbol 



Any logical expression that may be used 
in the operand field of a SETB instruction 
may be used in the operand field of an AIF 
instruction. The sequence symbol in the 
operand field must immediately follow the 
closing parenthesis of the logical expres- 
sion. 

The logical expression in the operand 
field is evaluated to determine if it is 
true or false. If the expression is true,, 
the statement named by the sequence symbol 
in the operand field is the next statement 
processed by the assembler. If the expres- 
sion is false, the next sequential state- 
ment is processed by the assembler. 

The statement named by the sequence 
symbol may precede or follow the AIF 
instruction. 

If an AIF instruction is in a macro- 
definition, then the sequence symbol in the 
operand field must appear in the name field 
of a statement in the definition. If an 



r t t 

| Name | Operation | Operand 

I— 



j MACRO 
| MOVE 
| AIF 
| AIF 
|ST' 
|L 
j ST 

.END j MEND 

x 



6N 



SN 



|6T,6F 

j (T*6T NE T'6F).END 

| (T'ST NE 'F') .END 

|2,SAVEAREA 

|2,SF 

|2,6T 

|2,SAVEAREA 



The logical expression in the operand 
field of statement 1 has the value true if 
the type attributes of the two macro- 
instruction operands are not equal. If the 
type attributes are equal, the expression 
has the logical value false. 

Therefore, if the type attributes are 
not equal, statement 4 (the statement named 
by the sequence symbol .END) is the next 
statement processed by the assembler. If 
the type attributes are equal,, statement 2 
(the next sequential statement) is 
processed. 

The logical expression in the operand 
field of statement 2 has the value true if 
the type attribute of the first macro- 
instruction operand is not the letter F. 
If the type attribute is the letter F, the 
expression has the logical value false. 
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Therefore, if the type attribute is not 
the letter F, statement 4 (the statement 
named by the sequence symbol .END) is the 
next statement processed by the assembler. 
If the type attribute is the letter F, 
statement 3 (the next sequential statement) 
is processed. 



AGO — UNCONDITIONAL BRANCH 





r t- 

|Name |Operati< 
L - - 4- 


_ T _ _ . 

Dn| Operand 

x _ ■ _ 


- 1 

1 
1 




r T 

| | MACRO 


— t 


1 




l&NAMF. |MOVE 


|ST,&F 




1 


| |AIF 


| (T'ST EQ ' F*) .FIRST 




2 


| |AGO 


| .END 




3 


| . FIRST |AIF 


| (T'&T NE T'&F) .END 






l&NAME |ST 


|2,SAVEAREA 






1 |L 


|2, £F 






1 1ST 


|2, 6T 






1 l L 


|2,SAVEAREA 




4 


| . END | MEND 








L _ X 




— J 



The AGO instruction is used to 
unconditionally alter the sequence in which 
source program or macro-definition state- 
ments are processed by the assembler. The 
assembler assigns a maximum count of 409 6 
AIF and AGO branches that may be executed 
in the source program or in a macro- 
definition. When a macro-definition calls 
an inner macro-definition, the current 
value of the count is saved and a new count 
of 4096 is set up for the inner macro- 
definition. When processing in the inner 
definition is completed and a return is 
made to the higher definition, the saved 
count is restored. The format of this 
instruction is: 



Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the type attribute is 
not the letter F, statement 2 is the next 
statement processed by the assembler. 

Statement 2 is used to indicate to the 
assembler that the next statement to be 
processed is statement 4 (the statement 
named by sequence symbol .END). 

ACTR ~ CONDITIONAL ASSEMBLY LOOP COUNTER 



r t t 1 

j Name | Operation | Operand | 

,. x x .j 

| A sequence | AGO |A sequence symbol | 
| symbol or j j | 

| blank | | | 

L X X J 



The statement named by the sequence 
symbol in the operand field is the next 
statement processed by the assembler. 



The statement named by the sequence 
symbol may precede or follow the AGO 
instruction. 



If an AGO instruction is part of a 
macro-definition, then the sequence symbol 
in the operand field must appear in the 
name field of a statement that is in that 
definition. If an AGO instruction appears 
outside macro-definitions, then the 
sequence symbol in the operand field must 
appear in the name field of a statement 
outside macro- definitions. 

The following example illustrates the 
use of the AGO instruction. 



The ACTR instruction is used to assign a 
maximum count (different from the standard 
count of 4096) to the number of AGO and AIF 
branches executed within a macro-definition 
or within the source program. The format 
of this instruction is as follows: 



r t t 1 

| Name | Operation | Operand | 

j. x x ., 

| Blank j ACTR JAny valid SETA j 
j | j expression j 
l x x . J 



This statement, which can only occur 
immediately after the global and local 
declarations, causes a counter to be set to 
the value in the operand field. The coun- 
ter is checked for zero or a negative 
value; if it is not zero or negative, it is 
decremented by one each time an AGO or AIF 
branch is executed. If the count is zero 
before decrementing, the assembler will 
take one of two actions: 

1. If processing is being performed 
inside a macro definition, the entire 
nest of macro definitions will be 
terminated and the next, source state- 
ment will be processed. 

2. If the source program is being proc- 
essed, an END card will be generated. 
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An ACTR instruction in a macro- 
definition affects only that definition; it 
has no effect on the number of AIF and AGO 
branches that may be executed in macro- 
definitions called. 



ANOP — ASSEMBLY NO OPERATION 



The ANOP instruction facilitates 
conditional and unconditional branching to 
statements named by symbols or variable 
symbols. 



Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is not the letter F, 
statement 2 is the next statement processed 
by the assembler. If the type attribute is 
the letter F, statement 4 should be 
processed next. However, since there is a 
variable symbol (&NAME) in the name field 
of statement 4, the required sequence sym- 
bol (.FTYPE) cannot be placed in the name 
field. Therefore, an ANOP instruction 
(statement 3) must be placed before state- 
ment 4 . 



The format of this instruction is: 



r t t 1 

| Name (Operation (Operand | 

j. + + -I 

j A se- JANOP | Blank j 

j quence j | j 

| symbol j | | 

L X JL J 

If the programmer wants to use an AIF or 
AGO instruction to branch to another state- 
ment, he must place a sequence symbol in 
the name field of the statement to which he 
wants to branch. However, if the program- 
mer has already entered a symbol or varia- 
ble symbol in the name field of that 
statement, he cannot place a sequence sym- 
bol in the name field. Instead, the pro- 
grammer must place an ANOP instruction 
before the statement and then branch to the 
ANOP instruction. This has the same effect 
as branching to the statement immediately 
after the ANOP instruction. 

The following example illustrates the 
use of the ANOP instruction. 





r 

|Name 

L 


_ T _ _ 

| Operation 

-J- — 


"T 

| Operand 

-4- 


i 

1 
j 




r 


T 

j MACRO 


T 


1 




l&NAME 


J MOVE 
|LCLC 


|6T,£F 
| STYPE 




1 




|AIF 


| (T'ST EQ ' F*) 


.FTYPE | 


2 


| &TYPE 


|SETC 


| 'E' 




3 


| . FTYPE 


|ANOP 






4 


|£NAME 


| ST6TYPE 
j L&TYPE 
JST&TYPE 
| LSTYPE 
j MEND 


|2,SAVEAREA 

|2,SF 

|2,6T 

j 2 , SAVE ARE A 






L 


-X _ . 


_x_ _. 


j 



Then, if the type attribute of the first 
operand is the letter F, the next statement 
processed by the assembler is the statement 
named by sequence symbol .FTYPE. The value 
of &TYPE retains its initial null character 
value because the SETC instruction is not 
processed. Since .FTYPE names an ANOP 
instruction, the next statement processed 
by the assembler is statement 4, the state- 
ment following the ANOP instruction. 



CONDITIONAL ASSEMBLY ELEMENTS 



The following chart summarizes the ele- 
ments that can be used in each conditional 
assembly instruction. Each row in this 
chart indicates which elements can be used 
in a single conditional assembly instruc- 
tion. Each column is used to indicate the 
conditional assembly instructions in which 
a particular element can be used. 



The intersection of a column and a row 
indicates whether an element can be used in 
an instruction, and if so, in what fields 
of the instruction the element can be used. 
For example, the intersection of the first 
row and the first column of the chart 
indicates that symbolic parameters can be 
used in the operand field of SETA instruc- 
tions. 
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Variable Symbols 



S.P. 



SET Symbols 



SETA | SETB | SETC 



Attributes 



T» | L* | S* | I' | K' | N' 



- T ,_ T T T . 



s.s. 



SETA 



N, O | O 

I 

1 



O 3 



o j o 



I — + — + — + — + — + — + 



SETB 



N.,0 



± I O 2 I 2 



O 2 



O 2 



+ + + + + + + 



SETC 



N,0 



+ + + + 



AIF 



o 1 | o 2 | : 

I I 



O 2 



2 



o 2 



N,0 






AGO 



I I 



+ + + + + + + 



N,,0 



ANOP 



4 + + 4. + + + . 



ACTR 



I 3 I I O I O J O I O 
-JL X J. X J. J. 



.± J~ 



1 Only in character relations 

2 Only in arithmetic relations 

3 Only if one to eight decimal digits 

Abbreviations 

N is Name L' is Length Attribute K' is Count Attribute 

O is Operand S' is Scaling Attribute N* is Number Attribute 

S.P. is Symbolic I* is Integer Attribute S.S. is Sequence Symbol 
Parameter 
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SECTION 10: EXTENDED FEATURES OF THE MACRO LANGUAGE 



The extended features of the macro lan- 
guage allow the programmer to: 

1. Terminate processing of a macro 
definition. 

2. Generate error messages. 

3. Define global SET symbols. 

4. Define subscripted SET symbols. 

5. Use system variable symbols. 

6. Prepare keyword and mixed-mode macro 
definitions and write keyword and 
mixed-mode macro instructions. 

7. Use other System/360 macro 
definitions. 



MEXIT — MACRO DEFINITION EXIT 



definition, 
statement of 
including those that 
MEXIT instructions. 



MEND must be the last 
every macro-definition, 



contain one or more 



The following example illustrates the 
use of the MEXIT instruction. 





r 

|Name 

L 


— r 

| Operation 
. j _ _ 


T 

| Operand 
j. 


1 

1 
1 




r 


T 

| MACRO 


T 


1 




l&NAME 


|MOVE 


|ST,&F 




1 




|AIF 


| (T'&T EQ 'F') .OK 




2 




| MEXIT 






3 


| .OK 


|ANOP 








l&NAME 


|ST 
|L 
|ST 
|L 

j MEND 


| 2, SAVEAREA 

|2,&F 

|2, £T 

| 2 , SAVEAREA 






L_ 


._x _ 


X 


1 



The MEXIT instruction is used to indi- 
cate to the assembler that it should termi- 
nate processing of a macro-definition. The 
format of this instruction is: 



r t t 1 

| Name | Operation | Operand | 

Y + + .j 

j A sequence | MEXIT | Blank | 

J symbol or | j j 

| blank | | | 

l x x j 



Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, the 
assembler processes the remainder of the 
macro-definition starting with statement 3. 
If the type attribute is not the letter F, 
the next statement processed by the 
assembler is statement 2. Statement 2 
indicates to the assembler that it is to 
terminate processing of the macro- 
definition. 



The MEXIT instruction may only be used 
in a macro-definition. 

If the assembler processes an MEXIT 
instruction that is in a macro-definition 
corresponding to an outer macro- 
instruction, the next statement processed 
by the assembler is the next statement 
outside macro-definitions. 

If the assembler processes an MEXIT 
instruction that is in a macro-definition 
corresponding to a second or third level 
macro-instruction, the next statement proc- 
essed by the assembler is the next state- 
ment after the second or tJiird level macro- 
instruction in the macro definition, 
respectively. 

MEXIT should not be confused with MEND. 
MEND indicates the end of a macro- 



MNOTE — REQUEST FOR ERROR MESSAGE 



The MNOTE instruction may be used to 
request the assembler to generate an error 
message. The format of this instruction 
is: 



I Name 



j. _ 

| A sequence 
I symbol, 
jvariable 
j symbol or 
Iblank 



-T T 

| Operation | Operand 



I MNOTE | A severity code, 
j followed by 
| a comma, followed 
j by any combination 
j of characters en- 
j closed in apostro- 
| phes 
-X . x J 
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The operand of the MNOTE instruction may 
also be written using one of the following 
forms : 



r ■ ■* 1 

| Operand | 

|. _ 1 

| severity- code, 'message* | 

| , 'message* j 

| 'message* j 

i J 



The MNOTE instruction may only be used 
in a macro-definition. Variable symbols 
may be used to generate the MNOTE mnemonic 
operation code, the severity code, and the 
message. 

The severity code may be a decimal 
integer from through 255 or an asterisk. 
If it is omitted, 1 is assumed. The 
severity code indicates the severity of the 
error, a higher severity code indicating a 
more serious error. 



Statement 1 is used to determine if the 
type attributes of both macro-instruction 
operands are the same. If they are, state- 
ment 2 is the next statement processed by 
the assembler. If they are not, statement 
4 is the next statement processed by the 
assembler. Statement 4 causes an error 
message indicating the type attributes are 
not the same to be printed in the source 
program listing. 

Statement 2 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the attribute is not 
the letter F, statement 5 is the next 
statement processed by the assembler. 
Statement 5 causes an error message indi- 
cating the type attribute is not F to be 
printed in the source program listing. 



GLOBAL AND LOCAL VARIABLE SYMBOLS 



When MNOTE * occurs, the statement in 
the operand field will be printed as a 
comment. 

Two apostrophes must be used to 
represent an apostrophe enclosed in apos- 
trophes in the operand field of an MNOTE 
instruction. One apostrophe will be listed 
for each pair of apostrophes in the operand 
field. If any variable symbols are used in 
the operand field of an MNOTE instruction, 
they will be replaced by the values 
assigned to them. Two ampersands must be 
used to represent an ampersand that is not 
part of a variable symbol in the operand 
field of an MNOTE statement. One ampersand 
will be listed for each pair of ampersands 
in the operand field. 



The 
bols: 



following are local variable sym- 



The following example illustrates 
use of the MNOTE instruction. 



the 
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L 
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| Operati 
.j 


T . 

on | Operand 

-4. _ _ _ _ 


1 

1 
j 
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t 

MACRO 


T 


— 1 




|gNAME|MOVE 


|ST,gF 








| MNOTE 


|*,'MOVE MACRO GEN' 




1 




|AIF 


| (T'ST NE T'&F).M1 




2 




JAIF 


| (T'ST NE 'F').M2 




3 


|£NAME|ST 


| 2 , SAVEAREA 








|L 


|2,SF 








jST 


|2,&T 








|L 


| 2, SAVEAREA 








| MEXIT 






4 


|.M1 


| MNOTE 
j MEXIT 


| ' TYPE NOT SAME ' 




5 


| . M2 


| MNOTE 
| MEND 


| 'TYPE NOT F' 






L 


-J._ 


_ J. _ _ _ _ _ 


J 



1. Symbolic parameters. 

2. Local SET symbols. 

3. System variable symbols. 

Global SET symbols are the only global 
variable symbols. 

The GBLA, GBLB, and GBLC instructions 
define global SET symbols, just as the 
LCLA, LCLB, and LCLC instructions define 
the SET symbols described in Section 9. 
Hereinafter, SET symbols defined by LCLA, 
LCLB, and LCLC instructions will be called 
local SET symbols. 

Global SET symbols communicate values 
between statements in one or more macro- 
definitions and statements outside macro- 
definitions. However, local SET symbols 
communicate values between statements in 
the same macro- definition, or between 
statements outside macro-definitions. 

If a local SET symbol is defined in two 
or more macro-definitions, or in a macro- 
definition and outside macro-definitions, 
the SET symbol is considered to be a 
different SET symbol in each case. 
However, a global SET symbol is the same 
SET symbol each place it is defined. 

A SET symbol must be defined as a global 
SET symbol in each macro-definition in 
which it is to be used as a global SET 
symbol. A SET symbol must be defined as a 
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global SET 
definitions,, 
global SET 
definitions. 



symbol 

if it is 

symbol 



outside macro- 
to be used as a 
outside macro- 



If the same SET symbol is defined as a 
global SET symbol in one or more places, 
and as a local SET symbol elsewhere, it is 
considered the same symbol wherever it is 
defined as a global SET symbol, and a 
different symbol wherever it is defined as 
a local SET symbol. 



Defining Local and Global SET Symbols 



Local SET symbols are defined when they 
appear in the operand field of an LCLA, 
LCLB, or LCLC instruction. These 
instructions are discussed in Section 9 
under "Defining SET Symbols." 

Global SET symbols are defined when they 
appear in the operand field of a GBLA, 
GBLB, or GBLC instruction. The format of 
these instructions is : 



r t t 

| Name | Operation | Operand 



h 



H 



| Blank | GBLA, |One or more variable | 

J j GBLB, or j symbols that are to be | 

| | GBLC | used as SET symbols, j 

j | j separated by commas J 

L X .X J 

The GBLA,, GBLB, and GBLC instructions 
define global SETA, SETB, and SETC symbols, 
respectively, and assign the same initial 
values as the corresponding types of local 
SET symbols. However, a global SET symbol 
is assigned an initial value by only the 
first GBLA, GBLB, or GBLC instruction proc- 
essed in which the symbol appears. Subse- 
quent GBLA, GBLB, or GBLC instructions 
processed by the assembler do not affect 
the value assigned to the SET symbol. 

The programmer should not define any 
global SET symbols whose first four charac- 
ters are SSYS. 

If a GBLA, GBLB, or GBLC instruction is 
part of a macro-definition, it must immedi- 
ately follow the prototype statement, or 
another GBLA, GBLB, or GBLC instruction. 
GBLA, GBLB, and GBLC instructions outside 
macro-definitions must appear after all 
macro-definitions in the source program, 
before all conditional assembly instruc- 
tions and PUNCH and REPRO statements out- 
side macro-definitions, and before the 
first control section of the program. 

All GBLA, GBLB, and GBLC instructions in 
a macro- definition must appear before all 
LCLA,, LCLB, and LCLC instructions in that 



macro-definition. All GBLA, GBLB, and GBLC 
instructions outside macro-definitions must 
appear before all LCLA, LCLB, and LCLC 
instructions outside macro-definitions. 



Using Global and Local SET Symbols 

The following examples illustrate the 
use of global and local SET symbols. Each 
example consists of two parts. The first 
part is an assembler language source pro- 
gram. The second part shows the statements 
that would be generated by the assembler 
after it processed the statements in the 
source program. 

Example 1 ; This example illustrates how 
the same SET symbol can be used to communi- 
cate (1) values between statements in the 
same macro-definition , and (2) different 
values between statements outside macro- 
definitions. 



| Name J Operation (Operand 



1- 


_X + 




| MACRO 




l&NAME 


| LOADA 






|LCLA 


|SA 


|£NAME 


|LR 


|15,SA 


|SA 


|SETA 
JMEND 


SA+1 




|LCLA 


|SA 


| FIRST 


| LOADA 






|LR 


|15,SA 




| LOADA 






|LR 


|15,SA 


L 


|END 
i 


| FIRST 

L _ _ _ 


r 


T 


r — — 


| FIRST 


|LR 


15,0 




|LR 


|15,0 




|LR 


|15,0 




|LR 


|15,0 




|END 


| FIRST 



L X X . J 

6A is defined as a local SETA symbol in 
a macro definition (statement 1) and 
outside macro definitions (statement 4) . 
SA is used twice within the macro 
definition (statements 2 and 3) and twice 
outside macro definitions (statements 5 and 
6). 

Since SA is a local SETA symbol in the 
macro definition and outside macro 
definitions, it is one SETA symbol in the 
macro definition, and another SETA symbol 
outside macro definitions. Therefore, 
statement 3 (which is in the 
macro definition) does not affect the value 
used for SA in statements 5 and 6 (which 
are outside macro definitions) . Moreover, 
the use of LOADA between statements 5 and 6 
will alter &A from its previous value as a 
local symbol within that macro definition 
since the first act of the macro definition 
is to LCLA &A to zero. 
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Example 2 ; This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
a macro- definition and statements outside 
macro-definitions . 



|Name 

L _ 


j Operation 

i _ 


Operand 


r 


T T 




| MACRO 




| SNAME 


| LOADA 






|GBLA 


|SA 


| SNAME 


|LR 


|15,SA 


|6A 


|SETA 
|MEND 


SA+1 




|GBLA 


|SA 


| FIRST 


| LOADA 






|LR 


|15,6A 




| LOADA 






|LR 


|15,SA 


i 


|END 

X — 


| FIRST 

j. _ 


r 


T 


r 


| FIRST 


|LR 


|15,0 




|LR 


|15,1 




|LR 


|15,1 




|LR 


|15,2 




|END 


| FIRST 



|Name 


| Operation 
j. _ _ _ _ 


| Operand 

-J. _ _ _ 


r 


T 

j MACRO 


T 


| SNAME 


| LOADA 






|LCLA 


|SA 


| SNAME 


|LR 


|15,6A 


|SA 


|SETA 
JMEND 

| MACRO 
j LOADB 


| SA+1 




|LCLA 


|SA 




|LR 


|15,SA 


|SA 


|SETA 
j MEND 


| SA+1 


| FIRST 


| LOADA 
| LOADB 
j LOADA 
| LOADB 






|END 


| FIRST 


h 


-+ 


_ + 


| FIRST 


|LR 


|15,0 




|LR 


1 15,0 




|LR 


|15,0 




|LR 


|15,0 




|END 


| FIRST 



L J. X J 



SA is defined as a global SETA symbol in 
a macro-definition (statement 1) and out- 
side macro-definitions (statement 4) . SA 
is used twice within the macro-definition 
(statements 2 and 3) and twice outside 
macro-definitions (statements 5 and 6). 

Since SA is a global SETA symbol in the 
macro-definition and outside macro- 
definitions, it is the same SETA symbol in 
both cases. Therefore, statement 3 (which 
is in the macro-definition) affects the 
value used for SA in statements 5 and 6 
(which are outside macro- definitions) . 

Example 3 ; This example illustrates how 
the same SET symbol can be used to 
communicate: (1) values between statements 
in one macro-definition, and (2) different 
values between statements in a different 
macro-definition. 

SA is defined as a local SETA symbol in 
two different macro-definitions (statements 
1 and 4). SA is used twice within each 
macro-definition (statements 2, 3, 5, and 
6). 

Since SA is a local SETA symbol in each 
macro-definition, it is one SETA symbol in 
one macro-definition, and another SETA sym- 
bol in the other macro-definition. There- 
fore, statement 3 (which is in one 
macro-definition) does not affect the value 
used for SA in statement 5 (which is in the 
other macro-definition) . Similarly, state- 
ment 6 does not affect the value used for 
SA in statement 2 . 



Example 4: This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
two different macro-definitions. 



JName j Operation | Operand 
j. + x 





| MACRO | 






SNAME 


| LOADA 








|GBLA 


SA 




SNAME 


|LR 


15, SA 




SA 


|SETA 
j MEND 

| MACRO 
j LOADB 


SA+1 






|GBLA 


SA 






|LR 


15, SA 




SA 


|SETA 
JMEND 


SA+1 




FIRST 


| LOADA 
j LOADB 
j LOADA 
j LOADB 








|END 


FIRST 






-+ 


h 


__ H 


FIRST 


|LR 


15,0 






|LR 


|15,1 






|LR 


15,2 






|LR 


15,3 






|END 


FIRST 





96 



SA is defined as a global SETA symbol in 
two different macro-definitions (statements 
1 and 4). SA is used twice within each 
macro-definition (statements 2, 3, 5 and 
6). 

Since &A is a global SETA symbol in each 
macro-definition, it is the same SETA sym- 
bol in each macro-definition. Therefore, 



statement 3 (which 
macro-definition) affects 
for SA in statement 5 
other macro-definition) . 
ment 6 affects the value 
statement 2 . 



is in one 
the value used 
(which is in the 
Similarly, state- 
used for SA in 



Example 5 ; This example illustrates how 
the same SET symbol can be used to communi- 
cate: (1) values between statements in two 
different macro- definitions, and (2) dif- 
ferent values between statements outside 
macro-definitions . 



Since SA is a global SETA symbol in each 
macro-definition, it is the same SETA 
symbol in each macro- definition. However, 
since SA is a local SETA symbol outside 
macro-definitions, it is a different SETA 
symbol outside macro-definitions. 



is in the 

it does not 

statements 

outside 



Therefore, statement 3 (which is in one 
macro-definition) affects the value used 
for SA in statement 5 (which 
other macro-definition) , but 
affect the value used for SA in 
8 and 9 (which are 
macro-definitions) . Similarly, statement 6 
affects the value used for SA in statement 
2, but it does not affect the value used 
for SA in statements 8 and 9. 



Subscripted SET Symbols 



r t t 

| Name | Operation | Operand 
y x + 





| MACRO 




|SNAME 


j LOADA 






|GBLA 


SA 


|SNAME 


|LR 


15, SA 


|SA 


j SETA 

JMEND 

| MACRO 
j LOADB 


SA+1 




JGBLA 


SA 




|LR 


15, SA 


|SA 


JSETA 
|MEND 


SA+1 




|LCLA 


SA 


| FIRST 


j LOADA 
| LOADB 






|LR 


15, SA 




| LOADA 






j LOADB 






|LR 


15, SA 


L 


JEND 

j. j 


FIRST 

L _ _ 


r 


T 1 


r 


| FIRST 


|LR 


15,0 




|LR 


15,1 




|LR 


15,0 




JLR 


15,2 




|LR 


15,3 




JLR 


15,0 




j END 


FIRST 



L X X J 



SA is defined as a global SETA symbol in 
two different macro-definitions (statements 
1 and 4) , but it is defined as a local SETA 
symbol outside macro-definitions (statement 
7). SA is used twice within each macro- 
definition and twice outside macro- 
definitions (statements 2, 3, 5, 6, 8 and 
9). 



Both global and local SET symbols may be 
defined as subscripted SET symbols. The 
local SET symbols defined in Section 9 were 
all nonsubscripted SET symbols. 

Subscripted SET symbols provide the pro- 
grammer with a convenient way to use one 
SET symbol plus a subscript to refer to 
many arithmetic, binary, or character 
values . 

A subscripted SET symbol consists of a 
SET symbol immediately followed by a sub- 
script that is enclosed in parentheses. 
The subscript may be any arithmetic expres- 
sion that is allowed in the operand field 
of a SETA statement. The subscript may not 
be or negative. 

The following are valid subscripted SET 
symbols. 

SREADER(17) 

&A23456US4) 

SX4F2(25+SA2) 



The following 
SET symbols. 



are invalid subscripted 



&X4F2 
(25) 
&X4F2 (25) 



(no subscript) 
(no SET symbol) 
(subscript does not 

immediately follow 

SET symbol) 



Defining Subscripted SET Symbols; If the 
programmer wants to use a subscripted SET 
symbol, he must write in a GBLA, GBLB, 
GBLC, LCLA, LCLB, or LCLC instruction, a 
SET symbol immediately followed by a deci- 
mal integer enclosed in parentheses. The 
decimal integer, called a dimension, indi- 
cates the number of SET variables associat- 
ed with the SET symbol. Every variable 
associated with a SET symbol is assigned an 
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initial value that is the same as the 
initial value assigned to the corresponding 
type of nonsubscripted SET symbol. 

If a subscripted SET symbol is defined 
as global, the same dimension must be used 
with the SET symbol each time it is defined 
as global. 

The maximum dimension that can be used 
with a SETA, SETB, or SETC symbol is 2500. 

A subscripted SET symbol may be used 
^nly if the declaration was subscripted; a 
nonsubscripted SET symbol may be used only 
if the declaration had no subscript. 

The following statements define the 
global SET symbols SSBOX, SWBOX, and SPSW, 
and the local SET symbol 6TSW. SSBOX has 
50 arithmetic variables associated with it, 
SWBOX has 20 character variables, SPSW and 
STSW each have 230 binary variables. 



r t t 

| Name | Operation j Operand 



|GBLA 
JGBLC 
JGBLB 
| LCLB 
.X 



SSBOX(50) 
SWBOX (20) 
SPSW(230) 
STSW(230) 



SYSTEM VARIABLE SYMBOLS 



System variable symbols are local vari- 
able symbols that are assigned values auto- 
matically by the assembler. There are 
three system variable symbols: SSYSNDX, 
SSYSECT, and SSYSLIST. System variable 
symbols may be used in the name, operation 
and operand fields of statements in macro- 
definitions, but not in statements outside 
macro-definitions. They may not be defined 
as symbolic parameters or SET symbols, nor 
may they be assigned values by SETA, SETB, 
and SETC instructions. 



SSYSNDX — Macro Instruction Index 



The system variable symbol SSYSNDX may 
be concatenated with other characters to 
create unique names for statements 
generated from the same model statement. 



SSYSNDX is assigned the four-digit num- 
ber 0001 for the first macro-instruction 
processed by the assembler, and it is 
incremented by one for each subsequent 
inner and outer macro instruction proc- 
essed. 



Using Subscripted SET Symbols; After the 
programmer has associated a number of SET 
variables with a SET symbol, he may assign 
values to each of the variables and use 
them in other statements. 

If the statements in the previous exam- 
ple were part of a macro-definition, (and 
SA was defined as a SETA symbol in the same 
definition) , the following statements could 
be part of the same macro-definition. 



Name 



h 



■T T 

| Operation | Operand 



"r— , 



1 | SA | SETA 

2 JSPSW(SA) j SETB 

3 |STSW(9) | SETB 

ft I |A 

5 j JCLI 

L X 



|5 

| (6 LT 2) 
j (SPSW(SA)) 
|2,=F'SSBOX(45) ' 

|AREA,C* SWBOX (17) * 
-X 



H 



Statement 1 assigns the arithmetic value 
5 to the nonsubscripted SETA symbol SA. 
Statements 2 and 3 then assign the binary 
value to subscripted SETB symbols SPSW(5) 
and STSW(9), respectively. Statements 4 
and 5 generate statements that add the 
value assigned to SSBOX (45) to general 
register 2, and compare the value assigned 
to SWBOX(17) to the value stored at AREA, 
respectively. 



If SSYSNDX is used in a model statement, 
SETC or MNOTE instruction, or a character 
relation in a SETB or AIF instruction, the 
value substituted for SSYSNDX is the four- 
digit number of the macro-instruction being 
processed, including leading zeros. 

If SSYSNDX appears in arithmetic 
expressions (e.g., in the operand field of 
a SETA instruction) # the value used for 
SSYSNDX is an arithmetic value. 

Throughout one use of a macro- 
definition, the value of SSYSNDX may be 
considered a constant, independent of any 
inner macro-instruction in that definition. 

The example in the next column 
illustrates these rules. It is assumed 
that the first macro- instruction processed, 
OUTER1, is the 106th macro-instruction 
processed by the assembler. 

Statement 7 is the 106th macro- 
instruction processed. Therefore, SSYSNDX 
is assigned the number 0106 for that macro- 
instruction. The number 0106 is 
substituted for SSYSNDX when it is used in 
statements 4 and 6. Statement 4 is used to 
assign the character value 0106 to the SETC 
symbol SNDXNUM. Statement 6 is used to 
create the unique name B0106. 
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r 

| Name 

Y 



j Operation 



x + 



j Operand 
+- 





| MACRO 






j INNER1 






|GBLC 


SNDXNUM 


ASSYSNDX 


|SR 


2,5 




|CR 


2,5 




|BE 


BSNDXNUM 




|B 


ASSYSNDX 




JMEND 






| MACRO 




SNAME 


| OUTER1 






|GBLC 


SNDXNUM 


SNDXNUM 


j SETC 


'SSYSNDX' 


SNAME 


|SR 


2,4 




JAR 


2,6 




| INNER1 




B6SYSNDX 


|S 

|MEND 

j. j 


2,=F'1000' 

L — — — 




t — 1 


r 


ALPHA 


| OUTER1 




BETA 


| OUTER1 

i • ._ _j 


i — — — 




T ■ 1 


r 


ALPHA 


JSR 


2,4 




|AR 


2,6 


A0107 


|SR 


2,5 




JCR 


2,5 




| BE 


B0106 




|B 


A0107 


B0106 


I s 


2,=F'1000' 


BETA 


|SR 


2,4 




JAR 


2,6 


A0109 


|SR 


2,5 




|CR 


2,5 




| BE 


B0108 




|B 


A0109 


B0108 


I s 


2,=F , 1000' 



SSYSECT — Current Control Section 



The system variable symbol SSYSECT may 
be used to represent the name of the 
control Section in which a macro- 
instruction appears. For each inner and 
outer macro-instruction processed by the 
assembler, SSYSECT is assigned a value that 
is the name of the control section in which 
the macro-instruction appears. 



When SSYSECT is used in a macro- 
definition, the value substituted for 
SSYSECT is the name of the last CSECT, 
DSECT, or START statement that occurs 
before the macro-instruction. If no named 
CSECT, DSECT, or START statements occur 
before a macro-instruction, SSYSECT is 
assigned a null character value for that 
macro- instruction. 



CSECT or DSECT statements processed in a 
macro-definition affect the value for 
SSYSECT for any subsequent inner macro- 
instructions in that definition, and for 
any other outer and inner macro- 
instructions. 



Throughout the use of a macro- 
definition, the value of SSYSECT may be 
considered a constant, independent of any 
CSECT or DSECT statements or inner macro- 
instructions in that definition. 



L X J J 



The 
rules . 



next example illustrates these 



Statement 5 is the 107th macro- 
instruction processed. Therefore, SSYSNDX 
is assigned the number 0107 for that macro- 
instruction. The number 0107 is 
substituted for SSYSNDX when it is used in 
statements 1 and 3. The number 0106 is 
substituted for the global SETC symbol 
SNDXNUM in statement 2. 



Statement 8 is the 108th macro- 
instruction processed. Therefore, each 
occurrence of SSYSNDX is replaced by the 
number 0108. For example, statement 6 is 
used to create the unique name B0108. 



When statement 5 is used to process the 
108th macro-instruction, statement 5 
becomes the 109th macro-instruction proc- 
essed. Therefore, each occurrence of 
SSYSNDX is replaced by the number 0109. 
For example, statement 1 is used to create 
the unique name A0109. 



Statement 8 is the last CSECT, DSECT, or 
START statement processed before statement 
9 is processed. Therefore, SSYSECT is 
assigned the value MAINPROG for macro- 
instruction OUTER1 in statement 9, 
MAINPROG is substituted for SSYSECT when it 
appears in statement 6 . 



Statement 3 is the last CSECT, DSECT, or 
START statement processed before statement 
4 is processed. Therefore, SSYSECT is 
assigned the value CSOUTl for macro- 
instruction INNER in statement 4. CSOUTl 
is substituted for SSYSECT when it appears 
in statement 2. 



Statement 1 is used to generate a CSECT 
statement for statement 4. This is the 
last CSECT, DSECT, or START statement that 
appears before statement 5. Therefore, 
SSYSECT is assigned the value INA for 
macro- instruction INNER in statement 5. 
INA is substituted for SSYSECT when it 
appears in statement 2. 
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Name 



- T T 

| Operation | Operand 



9 

10 



1- 


-+ 

j MACRO 


+ 




| INNER 


| SINCSECT 


| S INC SECT 


JCSECT 






|DC 


|A(SSYSECT) 




|MEND 






| MACRO 






| OUTER1 




ICSOUT1 


JCSECT 






|DS 


|100C 




| INNER 


j INA 




| INNER 


|INB 




|DC 


JA(SSYSECT) 




JMEND 






| MACRO 






| OUTER2 






|DC 


|A(SSYSECT) 


L_ _ 


|MEND 

j. _ . 


j. 


| MAINPROG 


T 

|CSECT 


t 




|DS 


|200C 




| OUTER1 




L 


j ODTER2 
4. — 


j. _ 


r 

| MAINPROG 


T 
|CSECT 


— t 




|DS 


|200C 


| CSOUT1 


| CSECT 






|DS 


|100C 


|INA 


j CSECT 






j DC 


|A(CSOUTl) 


|INB 


| CSECT 






|DC 


|A(INA) 




|DC 


| A (MAINPROG) 




|DC 


|A(INB) 



SSYSLIST(n) may be used to refer to the 
nth positional macro instruction operand. 
In addition, if the nth operand is a 
sublist, then &SYSLIST (n,m) may be used 
to refer to the rath operand in the sublist, 
where n and m may be any arithmetic 
expressions allowed in the operand field 
of a SETA statement, m may be equal to or 
greater than 1 and n has a range of 1 to 
200. 

If the value of subscript n is zero , then 
&SYSLIST(n) is assigned the value specified 
in the name field of the macro instruction, 
except when it is a sequence symbol. 

If the name field of the macro 
instruction is blank, then SSYSLIST (O) 
refers to a null character value. 

The type, length, scaling, integer, and 
count attributes of SSYSLIST (n) and 
SSYSLIST(n,m) and the number attributes of 
SSYSLIST (n) and SSYSLIST may be used in 
conditional assembly instructions. 
N'&SYSLIST may be used to refer to the tot- 
al number of positional operands in a macro- 
instruction statement. N , 6SYSLIST(n) may 
be used to refer to the number of operands 
in a sublist. If the nth operand is 
omitted, N' is zero; if the nth operand is 
not a sublist, N* is one. 



The following procedure 
evaluate N' SSYSLIST: 



is used to 



i x x j 



1. A sublist is considered to be one operand. 



Statement 1 is used to generate a CSECT 
statement for statement 5. This is the 
last CSECT, DSECT, or START statement that 
appears before statement 10. Therefore, 
6SYSECT is assigned the value INB for 
macro instruction OUTER2 in statement 10. 
INB is substituted for SSYSECT when it 
appears in statement 7. 



SSYSLIST — Macro Instruction Operand 



The system variable symbol SSYSLIST 
provides the programmer with an alternative 
to symbolic parameters for referring to 
positional macro instruction operands. 

SSYSLIST allows the programmer to 
refer to positional macro instruction 
operands for which no corresponding 
symbolic parameter is specified in the 
macro instruction prototype statement. 

SSYSLIST and symbolic parameters may be 
used in the same macro definition. 



2. The count includes operands specifically 
omitted (by means of commas) . 

Examples: 

Macro Instruction N'&SYSLIST 

MAC K1=DS 

MAC ,K1=DC 1 

MAC FULL,,F, ('l', I 2 , ),K1=DC 4 

MAC , 2 

MAC 

Attributes are discussed in Section 7 
under "Attributes." 

KEYWORD MACRO DEFINITIONS AND INSTRUCTIONS 

Keyword macro definitions provide the 
programmer with an alternate way of prepar- 
ing macro definitions. 

A keyword macro definition enables a 
programmer to reduce the number of operands 
in each macro instruction that corresponds 
to the definition, and to write the oper- 
ands in any order. 
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The macro instructions that correspond 
to the macro definitions described in Sec- 
tion 7 (hereinafter called positional 
macro instructions and positional macro 
definitions, respectively) require the 
operands to be written in the same order as 
the corresponding symbolic parameters in 
the operand field of the prototype state- 
ment. 

In a keyword macro definition, the pro- 
grammer can assign standard values to any 
symbolic parameters that appear in the 
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operand field of the prototype statement. 
The standard value assigned to a symbolic 
parameter is substituted for the symbolic 
parameter, if the programmer does not write 
anything in the operand field of the macro 
instruction to correspond to the symbolic 
parameter. 

When a keyword macro instruction is 
written, the programmer need only write one 
operand for each symbolic parameter whose 
value he wants to change. 

Keyword macro- definitions are prepared 
the same way as positional macro 
definitions, except that the prototype 
statement is written differently. The 
rules for preparing positional macro- 
definitions are in Section 7 . 



The following keyword prototype state- 
ment contains a symbolic parameter in the 
name field, and four operands in the oper- 
and field. The first two operands contain 
standard values. The mnemonic operation 
code is MOVE. 



r t t 1 

| Name | Operation | Operand | 

j. x + 1 

J6N J MOVE |SR=2,&A=S,£T=,£F= j 

'I X X J 



Keyword Macro Instruction 



Keyword Prototype 



T.he format of this statement is: 



Name 



j. 

J A symbolic 
j parameter 
J or blank 



j Ope ration j Operand 



_x .| 

A symbol |One or more J 
j operands of the j 
j form described j 
j below, separated j 
j by commas j 
-X J 



Each operand must consist of a symbolic 
parameter, immediately followed by an equal 
sign and optionally followed by a standard 
value. This value must not include a 
keyword. 

A standard value that is part of an 
operand must immediately follow the equal 
sign. 

Anything that may be used as an operand 
in a macro instruction except variable 
symbols, may be used as a standard value in 
a keyword prototype statement. The rules 
for forming valid macro instruction oper- 
ands are detailed in Section 8. 



The following are valid 
type operands. 



keyword proto- 



gREADER= 

6LOOP2=SYMBOL 

6S,4==F'4096' 

The following are invalid keyword proto- 
type operands. 



CARDAREA 
&TYPE 
&TWO =123 



&AREA= X'lSgA' 



(no symbolic parameter) 
(no equal sign) 
(equal sign does not 

immediately follow 

symbolic parameter) 
(standard value does 

not immediately follow 

equal sign) 



After a programmer has prepared a key- 
word macro definition he may use it by 
writing a keyword macro instruction. 



The format 
instruction is: 



of 



keyword 



macro 



r t t 1 

| Name | Ope rati on | Operand j 

,. x x ., 

| A symbol, | Mnemonic |Zero or more operands | 
| sequence |operation| of the form described! 
j symbol, j code | below, separated by j 
| or blank j | commas j 

i x x J 



Each operand consists of a keyword 
immediately followed by an equal sign and 
an optional value which may not include a 
keyword. Anything that may be used as an 
operand in a positional macro instruction 
may be used as a value in a keyword 
macro- instruction. The rules for forming 
valid positional macro instruction operands 
are detailed in Section 8. 

A keyword consists of one through seven 
letters and digits, the first of which must 
be a letter. 

The keyword part of each keyword macro 
instruction operand must correspond to one 
of the symbolic parameters that appears in 
the operand field of the keyword prototype 
statement. A keyword corresponds to a 
symbolic parameter if the characters of the 
keyword are identical to the characters of 
the symbolic parameter that follow the 
ampersand. 



The following are valid 
instruction operands. 

L00P2=SYMB0L 
S4==F' 4096'' 
TO= 



keyword macro 
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The following are invalid keyword macro- 
instruction operands. 



Name 



Operation 



6XHF2=0(2„3) 



CARDAREA=A+2 



=(T0(8)„ (FROM)) 



( keyword does not begin 

with a letter) 
(keyword is more than 

seven characters) 
(no keyword) 



The operands in a keyword macro- 
instruction may be written in any order. 
If an operand appeared in a keyword 
prototype statement,, a corresponding oper- 
and does not have to appear in the keyword 
macro-instruction. If an operand is omit- 
ted,, the comma that would have separated it 
from the next operand need not be written. 

The following rules are used to replace 
the symbolic parameters in the statements 
of a keyword macro-definition. 

1. If a symbolic parameter appears in the 
name field of the prototype statement, 
and the name field of the macro- 
instruction contains a symbol, the 
symbolic parameter is replaced by the 
symbol. If the name field of the 
macro-instruction is blank or contains 
a sequence symbol;, the symbolic 
parameter is replaced by a null char- 
acter value. 

2. If a symbolic parameter appears in the 
operand field of the prototype state- 
ment, and the macro-instruction con- 
tains a keyword that corresponds to 
the symbolic parameter, the value 
assigned to the keyword replaces the 
symbolic parameter. 

3. If a symbolic parameter was assigned a 
standard value by a prototype state- 
ment, and the macro-instruction does 
not contain a keyword that corresponds 
to the symbolic parameter, the stand- 
ard value assigned to the symbolic 
parameter replaces the symbolic param- 
eter. Otherwise, the symbolic param- 
eter is replaced by a null character 
value. 

Note 1; If a standard value is a self- 
defining term the type attribute assigned 
to the standard value is the letter N. If 
a standard value is omitted the type 
attribute assigned to the standard value is 
the letter 0. All other standard values 
are assigned the type attribute U. 

Note 2: Positional parameters cannot be 
changed to keywords by substitution. That 
is, in the following example, the expression 
A=FB, statement 2, will be treated as a 
positional operand consisting of a character 
string in the generation of the MAC macro; 
it will not be treated as a keyword A with 
the value FB. 



2 ' &VALUE 



GBLC 
SETC 
MAC 



Operand , 
1 

&VALUE I 
»A=FB' 



&VALUE I 
l 



The following keyword macro- definition, 
keyword macro-instruction, and generated 
statements illustrate these rules. 











~ 1 




|Name 
| 


j Operation 
| MACRO 


| Operand 
1 


1 

— ^: 




1 


|&N 


|MOVE 


| SR=2 , £A=S, 6T=, €F= 




2 


|6N 


|ST 


|SR,&A 




3 




|L 


|6R, &F 




4 




|ST 


|6R,ST 




5 




JMEND 


|€R,fiA 
1 






L 


-+ 


- + 


— -i 




r 


6 


|HERE 

L 


|MOVE 
_.i 


| T=FA, F=FB , A=THERE 
_4. __ 


• 




r 


_.| 


T 


1 




|HERE 


|ST 
j ST 


| 2, THERE 
| 2, FB 
I 2 , FA 
j 2, THERE 






I _ 


_x _ . 


—L_ _ _ 


_ j 



Statement 1 assigns the standard values 
2 and S to the symbolic parameters 6R and 
6 A, respectively. Statement 6 assigns the 
values FA, FB, and THERE to the keywords T, 
F,, and A, respectively. The symbol HERE is 
used in the name field of statement 6. 



Since a symbolic parameter (6N) appears 
in the name field of the prototype state- 
ment (statement 1) , and the corresponding 
characters (HERE) of the macro- instruction 
(statement 6) are a symbol, €N is replaced 
by HERE in statement 2 . 



Since 6T appears in the operand field, 
of statement 1, and statement 6 contains 
the keyword (T) that corresponds to 6T, the 
value assigned to T (FA) replaces &T in 
statement 4. Similarly, FB and THERE 
replace 6F and SA in statement 3 and in 
statements 2 and 5, respectively. Note 
that the value assigned to &A in statement 
6 is used instead of the value assigned to 
&A in statement 1. 

Since &R appears in the operand field of 
statement 1, and statement 6 does not 
contain a corresponding keyword, the value 
assigned to SR (2) , replaces SR in state- 
ments 2, 3,, 4, and 5. 

Operand Sublists: The value assigned to a 
keyword and the standard value assigned to 
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a symbolic parameter may be an operand 
sublist. Anything that may be used as an 
operand sublist in a positional macro- 
instruction may be used as a value in a 
keyword macro-instruction and as a standard 
value in a keyword prototype statement. 
The rules for forming valid operand 
sublists are detailed in Section 8 under 
"Operand Sublists." 



r t t 1 

| Name | Operation | Operand | 

|. x x ^ 

jfiN j MOVE |6TY f £P, €R, STO=, 6F= j 

l X X J 



Mixed-Mode Macro- Instruction 



Keyword Inner Macro Instructions; Keyword 
and positional inner macro instructions may 
be used as model statements in either 
keyword or positional macro definitions. 

MIXED-MODE MACRO DEFINITIONS AND 
INSTRUCTIONS 



Mixed-mode macro- definitions allow the 
programmer to use the features of keyword 
and positional macro definitions in the 
same macro definition. 



Mixed-mode macro definitions are pre- 
pared the same way as positional macro- 
definitions, except that the prototype 
statement is written differently. If &SYS- 
LIST is used, it refers only to the posi- 
tional operands in the macro instruction. 
Subscripting past the last positional 
parameter will yield an empty string and 
a type attribute of "0". The rules for 
preparing positional macro definitions 
are in Section 7 . 

Mixed-Mode Prototype 



The format of this statement is: 









Name | Operation 


j Operand | 


- _ j. _ 




X_ _ j 


T 




t — _ ^ 


A symbolic |A 


symbol 


| One or more oper- | 


parameter | 




| ands of the form | 


or blank | 




| described below, | 
| separated by j 
j commas j 









The operands must be valid operands of 
positional and keyword prototype 
statements. All the positional operands 
must precede the first keyword operand. 
The rules for forming positional operands 
are discussed in Section 7, under 
"Macro-Instruction Prototype." The rules 
for forming keyword operands are discussed 
above under "Keyword Prototype. " 



The following sample mixed-mode 
prototype statement contains three posi- 
tional operands and two keyword operands. 



The format of 
instruction is: 



mixed-mode macro- 



IName 



h 



- T T 

I Ope rati on | Operand 



I 
1 

J A symbol, | Mnemonic | Zero or more operands | 
j sequence j operation! of the form described! 
j symbol, j code | below, separated by j 
jor blank j j commas | 

l x x J 



The operand field consists of two parts. 
The first part corresponds to the 
positional prototype operands. This part 
of the operand field is written in the same 
way that the operand field of a positional 
macro-instruction is written. The rules 
for writing positional macro-instructions 
are in Section 8. 

The second part of the operand field 
corresponds to the keyword prototype oper- 
ands. This part of the operand field is 
written in the same way that the operand 
field of a keyword macro-instruction is 
written. The rules for writing keyword 
macro-instructions are described above 
under "Keyword Macro- Instruction. " 

The following mixed-mode macro- 
definition, mixed-mode macro-instruction, 
and generated statements illustrate these 
facilities. 



r t t 

| Name | Operation! Operand 



-+- 



|6N 
UN 



h 



| MACRO 

j MOVE 

JSTSTY 

JLgTY 

JST&TY 

|L€TY 



I 

j STY, SP,SR, ST0=, 

| SR,SAVE 

| SR,SPSF 

| SR,6PST0 

| SR,SAVE 



SF= j 



2 I 



HERE | MOVE 

t + 

j HERE j STH 
I |LH 
| j STH 
I |LH 
L X 



j H, ,2,F=FB,T0=FA 



2, SAVE 
2,FB 
2,FA 
2, SAVE 



The prototype statement (statement 
contains three positional operands (STY, 
and £R) and two keyword operands (STO 



— j 

1) 

SP, 
and 
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6F) . In the macro instruction (statement 
2) the positional operands are written in 
the same order as the positional operands 
in the prototype statement (the second 
operand is omitted) . The keyword operands 
are written in an order that is different 
from the order of keyword operands in the 
prototype statement. 

Mixed-mode inner macro instructions may 
be used as model statements in mixed-mode, 
keyword, and positional macro-definitions. 
Keyword and positional inner macro- 
instructions may be used as model 
statements in mixed-mode macro definitions. 



MACRO DEFINITION COMPATIBILITY 



Macro definitions prepared for use with 
the other System/360 assemblers having 
macro language facilities may be used with 
the Operating System/360 assembler provided 
that all SET symbols are defined in an 
appropriate LCLB, GBLA, GBLB, or GBLC 
statement. The AIFB and AGOB instructions 
will be processed by the Operating 
System/360 assembler the same way that the 
AIF and AGO instructions are processed. 
AIFB and AGOB instructions will cause the 
count set up by the ACTR instructions to be 
decremented in exactly the same way as the 
AGO and AIF instructions. 
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APPENDIX I: ASSEMBLER LANGUAGES — FEATURES COMPARISON CHART 
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APPENDIX A: CHARACTER CODES 



| System/360 


Character Set 






EBCDIC 




| 8 -bit 


Punch 




Hexa- 


Printer 




j Code 


Combination 


Decimal 


Decimal 


Graphics 








L J 


L J 


L_ . _ r . 


„, -J 


| 00000000 


12,0,9,8,1 





00 






| 00000001 


12,9 


,1 


1 


01 






j 00000010 


12,9 


,2 


2 


02 






| 00000011 


12,9 


,3 


3 


03 






| 00000100 


12,9 


,4 


4 


04 






| 00000101 


12,9 


,5 


5 


05 






| 00000110 


12,9 


6 


6 


06 






| 00000111 


12,9 


,7 


7 


07 






| 00001000 


12,9 


,8 


8 


08 






| 00001001 


12,9 


8,1 


9 


09 






j 00001010 


12,9 


,8,2 


10 


0A 






j 00001011 


12, 9, 


8,3 


11 


0B 






| 00001100 


12,9 


,8,4 


12 


OC 






| 00001101 


12,9, 


8,5 


13 


0D 






1 00001110 


12, 9 ( 


8,6 


14 


0E 






| 00001111 


12,9 


,8,7 


15 


OF 






| 00010000 


12,11 


L,9,8,l 


16 


10 






j 00010001 


11,9 


,1 


17 


11 






| 00010010 


11,9, 


2 


18 


12 






| 00010011 


11, 9, 


3 


19 


13 






| 00010100 


11,9, 


4 


20 


14 






| 00010101 


11,9, 


5 


21 


15 






j 00010110 


11,9, 


,6 


22 


16 






| 00010111 


11,9, 


,7 


23 


17 






| 00011000 


11,9, 


8 


24 


18 






| 00011001 


11,9, 


,8,1 


25 


19 






| 00011010 


11,9, 


8,2 


26 


1A 






| 00011011 


11,9, 


,8,3 


27 


IB 






| 00011100 


11,9, 


,8,4 


28 


1C 






| 00011101 


11,9., 


8,5 


29 


ID 






| 00011110 


11,9, 


8,6 


30 


IE 






| 00011111 


11.9, 


8,7 


31 


IF 






| 00100000 


11,0, 


9,8,1 


32 


20 






| 00100001 


0,9,1 


33 


21 






| 00100010 


0,9,2 


34 


22 






| 00100011 


0,9,3 


35 


23 






j 00100100 


0,9, 4 


36 


24 






| 00100101 


0,9,5 


37 


25 






| 00100110 


0,9,6 


38 


26 






| 00100111 


0,9,7 


39 


27 






| 00101000 


0,9,8 


40 


28 






j 00101001 


0,9,8,1 


41 


29 






j 00101010 


0,9,8,2 


42 


2A 






| 00101011 


0,9,8,3 


43 


2B 






| 00101100 


0,9,8,4 


44 


2C 






| 00101101 


0,9,8,5 


45 


2D 






| 00101110 


0,9,8,6 


46 


2E 






| 00101111 


0,9,8,7 


47 


2F 






| 00110000 


12,11,0,9,8,1 


48 


30 






j 00110001 


9,1 


49 


31 






j 00110010 


9,2 




50 


32 
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| System/36 


Character Set 








EBCDIC 


| 8-bit 


Punch 




Hexa- 




Printer 


j Code 


Combination 


Decimal 


Decimal 




Graphics 


L_ _ _ J 


L ._ J 
















I- — - - — ( 


r — 




| 00110011 


9,3 


51 


33 






| 00110100 


9,4 


52 


34 






| 00110101 


9,5 


53 


35 






| 00110110 


9,6 


54 


36 






| 00110111 


9,7 


55 


37 






| 00111000 


9,8 


56 


38 






| 00111001 


9,8.1 


57 


39 






| 00111010 


9.8,2 


58 


3A 






| 00111011 


9.8,3 


59 


3B 






| 00111100 


9,8,4 


60 


3C 






| 00111101 


9,8,5 


61 


3D 






| 00111110 


9,8.6 


62 


3E 






j 00111111 


9,8,7 


63 


3F 






| 01000000 




64 


40 


(blank) 


| 01000001 


12,0,9,1 


65 


41 






| 01000010 


12,0,9,2 


66 


42 






| 01000011 


12,0,9,3 


67 


43 






j 01000100 


12,0.9,4 


68 


44 






j 01000101 


12,0.9.5 


69 


45 






| 01000110 


12,0.9.6 


70 


46 






i oioooin 


12.0,9,7 


71 


47 






| 01001000 


12,0,9,8 


72 


48 






j 01001001 


12,8,1 


73 


49 






| 01001010 


12,8,2 


74 


4A 


* 


(cent sign) 


j 01001011 


12,8,3 


75 


4B 


. 


(period) 


| 01001100 


12,8,4 


76 


4C 


< 




j 01001101 


12,8,5 


77 


4D 


( 




| 01001110 


12,8,6 


78 


4E 


+ 




| 01001111 


12,8,7 


79 


4F 


1 


(logical OR) 


j 01010000 


12 


80 


5 


t 




j 01010001 


12,11,9,1 


81 


51 






1 01010010 


12,11,9,2 


82 


52 






| 01010011 


12,11,9,3 


83 


53 






j 01010100 


12,11,9,4 


84 


54 






| 01010101 


12,11,9,5 


85 


55 






| 01010110 


12,11,9,6 


86 


56 






| 01010111 


12,11,9,7 


87 


57 






j 01011000 


12,11,9,8 


88 


58 






| 01011001 


11.8,1 


89 


59 






| 01011010 


11,8,2 


90 


5A 


i 




| 01011011 


11,8,3 


91 


5B 


$ 




j 01011100 


11.8,4 


92 


5C 


* 




j 01011101 


11,8,5 


93 


5D 


) 




j 01011110 


11,8,6 


94 


5E 


} 




j 01011111 


11.8,7 


95 


5F 


—i 


(logical NOT) 


j 01100000 


11 


96 


60 


- 


(hyphen) 


| 01100001 


0,1 


97 


61 


/ 




j 01100010 


11,0,9,2 


98 


62 






| O'llOOOll 


11,0,9,3 


99 


63 






j 01100100 


11.0,9,4 


100 


64 






| 01100101 


11,0,9,5 


101 


65 






j 01100110 


11,0,9,6 


102 


66 






j 01100111 


11.0,9,7 


103 


67 






j 01101000 


11.0,9.8 


104 


68 






j 01101001 


0,8,1 


105 


69 






| 01101010 


12,11 


106 


6A 






| 01101011 


0,8,3 


107 


6B 


, 


(comma) 
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i System/360 


Character 


Set 








EBCDIC 


1 8 -bit 


Punch 






Hexa- 




Printer 


1 Code 


Combination 


Decimal 

L J 


Decimal 

L J 


L 


Graphics 
















| 011011O0 


0,8,4 




108 


6C 


% 




| 01101101 


0,8,5 




109 


6D 




(underscore) 


j 01101110 


0,8,6 




110 


6E 


> 




! oiiomi 


0,8,7 




111 


6F 


? 




| 01110000 


12,11,0 




112 


70 






} 01110001 


12,11,0,9, 


1 


113 


71 






| 01110010 


12,11,0,9, 


2 


114 


72 






| 01110011 


12,11.0,9, 


3 


115 


73 






| 01110100 


12,11,0,9, 


4 


116 


74 






| 01110101 


12,11,0,9, 


5 


117 


75 






| 01110110 


12,11,0,9, 


6 


118 


76 






| 01110111 


12,11.0,9, 


7 


119 


77 






| 01111000 


12,11,0.9, 


8 


120 


78 






| 01111001 


8,1 




121 


79 






| 01111010 


8,2 




122 


7A 


: 




| 01111011 


8,3 




123 


7B 


# 




| 01111100 


8,4 




124 


7C 


a 




| 01111101 


8,5 




125 


7D 


, 


(apostrophe) 


| 01111110 


8,6 




126 


7E 


s= 




| 01111111 


8,7 




127 


7F 


II 




| 10000000 


12,0,8,1 




128 


80 






| 10000001 


12,0,1 




129 


81 


a 




j 10000010 


12,0,2 




130 


82 


b 




| 10000011 


12,0,3 




131 


83 


c 




| 10000100 


12,0,4 




132 


84 


d 




j 10000101 


12,0,5 




133 


85 


e 




| 10000110 


12,0,6 




134 


86 


f 




| 10000111 


12,0,7 




135 


87 


g 




i 10001000 


12,0,8 




136 


88 


h 




1 10001001 


12,0,9 




137 


89 


i 




| 10001010 


12,0,8,2 




138 


8A 






i 10001011 


12,0.8,3 




139 


8B 






| 10001100 


12,0,8,4 




140 


8C 






i 10001101 


12,0,8,5 




141 


8D 






| 10001110 


12,0,8,6 




142 


8E 






j 10001111 


12,0,8,7 




143 


8F 






i 10010000 


12,11,8,1 




144 


90 






| 10010001 


12,11,1 




145 


91 


j 




! iooiooio 


12,11,2 




146 


92 


k 




| 10010011 


12,11,3 




147 


93 


1 




| 10010100 


12,11,4 




148 


94 


m 




j 10010101 


12,11,5 




149 


95 


n 




! looiono 


12,11,6 




150 


96 


o 




j 10010111 


12,11,7 




151 


97 


P 




| 10011000 


12,11,8 




152 


98 


q 




i 10011001 


12,11,9 




153 


99 


r 




j 10011010 


12,11,8,2 




154 


9A 






| 10011011 


12,11,8,3 




155 


9B 






i 10011100 


12,11,8,4 




156 


9C 






| 10011101 


12,11,8,5 




157 


9D 






| 10011110 


12,11,8,6 




158 


9E 






I 10011111 


12,11,8,7 




159 


9F 






| 10100000 


11,0,8,1 




160 


A0 






! loiooooi 


11,0,1 




161 


Al 






j 10100010 


11,0,2 




162 


A2 


s 




J 10100011 


11,0,3 




163 


A3 


t 




| 10100100 


11,0,4 




164 


A4 


u 





H 



—J 
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I System/360 


Character Set 






EBCDIC 


j 8-bit 


Punch 




Hexa- 


Printer 


| Code 

L _ J 


Combination 


Decimal 


Decimal 


Graphics 












| 10100101 


11,0,5 


165 


A5 


V 


| 10100110 


11,0,6 


166 


A6 


w 


| 10100111 


11,0,7 


167 


A7 


X 


| 10101000 


11,0,8 


168 


A8 


y 


| 10101001 


11,0,9 


169 


A9 


z 


| 10101010 


11,0,8,2 


170 


AA 




| 10101011 


11,0,8,3 


171 


AB 




| 10101100 


11,0,8,4 


172 


AC 




| 10101101 


11,0,8,5 


173 


AD 




j 10101110 


11,0,8,6 


174 


AE 




| 10101111 


11,0,8,7 


175 


AF 




| 10110000 


12,11,0,8,1 


176 


B0 




| 10110001 


12,11,0,1 


177 


Bl 




| 10110010 


12,11,0,2 


178 


B2 




j 10110011 


12,11,0,3 


179 


B3 




j 10110100 


12,11,0,4 


180 


B4 




| 10110101 


12,11,0,5 


181 


B5 




j 10110110 


12,11,0,6 


182 


B6 




j 10110111 


12,11,0,7 


183 


B7 




| 10111000 


12,11,0,8 


184 


B8 




| 10111001 


12,11,0,9 


185 


B9 




| 10111010 


12,11,0,8,2 


186 


BA 




| 10111011 


12,11,0,8,3 


187 


BB 




| 10111100 


12,11,0,8,4 


188 


BC 




| 10111101 


12,11,0,8,5 


189 


BD 




| 10111110 


12,11,0,8,6 


190 


BE 




j 10111111 


12,11,0,8,7 


191 


BF 




j 11000000 


12,0 


192 


CO 




1 iioooooi 


12,1 


193 


CI 


A 


| 11000010 


12,2 


194 


C2 


B 


| 11000011 


12,3 


195 


C3 


C 


| 11000100 


12,4 


196 


C4 


D 


| 11000101 


12,5 


197 


C5 


E 


| 11000110 


12,6 


198 


C6 


F 


| 11000111 


12,7 


199 


C7 


G 


| 11001000 


12,8 


200 


C8 


H 


| 11001001 


12,9 


201 


C9 


I 


| 11001010 


12,0,9,8,2 


202 


CA 




j 11001011 


12,0,9,8,3 


203 


CB 




j 11001100 


12,0,9.8,4 


204 


CC 




| 11001101 


12,0,9,8,5 


205 


CD 




| 11001110 


12,0,9,8,6 


206 


CE 




j 11001111 


12,0,9,8,7 


207 


CF 




| 11010000 


11,0 


208 


DO 




| 11010001 


11,1 


209 


Dl 


J 


j 11010010 


11,2 


210 


D2 


K 


| 11010011 


11,3 


211 


D3 


L 


j 11010100 


11,4 


212 


D4 


M 


| 11010101 


11,5 


213 


D5 


N 


| 11010110 


11,6 


214 


D6 


O 


| 11010111 


11,7 


215 


D7 


P 


| 11011000 


11,8 


216 


D8 


Q 


| 11011001 


11,9 


217 


D9 


R 


j 11011010 


12,11,9,8,2 


218 


DA 




| 11011011 


12,11,9,8,3 


219 


DB 




| 11011100 


12,11,9,8,4 


220 


DC 




| 11011101 


12,11,9,8,5 


221 


DD 





H 



L X X X X J 
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| System/360 


Character Set | 








EBCDIC 


| 8-bit 


Punch 






Hexa- 




Printer 


| Code 


Combination | 


Decimal 


Decimal 




Graphics 


L— — — J 


L _ 


X. 


j 


L J 


L 




r 1 


r — 


— T 


1 


r 1 


r 




| 11011110 


12,11,9,8,6 




222 


DE 






| 11011111 


12,11,9,8,7 




223 


DF 






| 11100000 


0,8,2 




224 


E0 






| 11100001 


11,0,9,1 




225 


El 






| 11100010 


0,2 




226 


E2 


S 




J 11100011 


0,3 




227 


E3 


X 




| 11100100 


o.u 




228 


E4 


u 




| 11100101 


0,5 




229 


E5 


V 




| 11100110 


0,6 




230 


E6 


w 




| 11100111 


0,7 




231 


E7 


X 




| 11101000 


0,8 




232 


E8 


Y 




1 11101001 


0,9 




233 


E9 


Z 




| 11101010 


11,0,9,8,2 




234 


EA 






| 11101011 


11,0,9,8,3 




235 


EB 






| 11101100 


11,0, 9,8, 4 




236 


EC 






| 11101101 


11,0,9,8,5 




237 


ED 






| 11101110 


11,0,9,8,6 




238 


EE 






| 11101111 


11,0,9,8,7 




239 


EF 






| 11110000 







240 


F0 







| 11110001 


1 




241 


Fl 


1 




j 11110010 


2 




242 


F2 


2 




| 11110011 


3 




243 


F3 


3 




| 11110100 


4 




244 


F4 


4 




| 11110101 


5 




245 


F5 


5 




| 11110110 


6 




246 


F6 


6 




| 11110111 


7 




247 


F7 


7 




| 11111000 


8 




248 


F8 


8 




| 11111001 


9 




249 


F9 


9 




| 11111010 


12,11,0,9,8, 


2 I 


250 


FA 






| 11111011 


12,11,0,9,8, 


3 j 


251 


FB 






| 11111100 


12,11,0,9,8, 


4 | 


252 


FC 






| 11111101 


12,11,0,9,8, 


5 I 


253 


FD 






| 11111110 


12,11,0,9,8, 


6 1 


254 


FE 






1 11111111 


12,11,0,9,8, 


7 j 


255 


FF 







L X X X X J 



Special Graphic Characters 






C Cent Sign * Asterisk 


x> Greater-than Sign 


Period, Decimal Point 


) Right Parenthesis 


? Question Mark 


^ Less-than Sign 


; Semicolon 


Colon 


( Left Parenthesis ~ > Logical NOT 


# Number Sign 


+ Plus Sign 


• Minus Sign, Hyphen @ At Sign 


I Vertical Bar, Logical OR / Slash 


i Prime, Apostrophe 


& Ampersand 


' Comma 


= Equal Sign 


! Exclamation Point % Percent 


" Quotation Mark 


$ Dollar Sign 


Underscore 








Bit Pattern 


Hole Pattern 


Examples 


Type 


Bit Positions 












01 23 4567 


Zone Punches 


Digit Punches 


PF 


Control Character 


00 00 0100 


12-9-4 


% 


Special Graphic 


01 10 1100 


0-8-4 


R 


Upper Case 


11 01 1001 


11 ? 9 


a 


Lower Case 


10 00 0001 


12-0-1 




Control Character, 


0011 0000 


12-11-0 -9-8-1 




function not yet 




1 




assigned 




1 
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APPENDIX B: HEXADECIMAL-DECIMAL NUMBER CONVERSION TABLE 



The table in this appendix provides for direct conversion 
numbers in these ranges: 



of decimal and hexadecimal 



r t 1 

| Hexadecimal | Decimal | 
,. + 1 

j 000 to FFF j 0000 to 4095 j 

i a j 



Decimal numbers (0000-4095) are given within the 5-part table. The first two characters 
(high-order) of hexadecimal numbers (000-FFF) are given in the lefthand column of the 
table; the third character (x) is arranged across the top of each part of the table. 

To find the decimal equivalent of the hexadecimal number 0C9, look for 0C in the left 
column, and across that row under the column for x = 9. The decimal number is 0201. 

To convert from decimal to hexadecimal, look up the decimal number within the table 
and read the hexadecimal number by a combination of the hex characters in the left 
column, and the value for x at the top of the column containing the decimal number. For 
example, the decimal number 123 has the hexadecimal equivalent of 07B; the decimal 
number 1478 has the hexadecimal equivalent of 5C6. 

For numbers outside the range of the table, add the following values to the table 







I Hexadecimal 
| 10 00 


Decimal I 
4096 | 


| 2000 


8192 | 


| 3000 


12288 | 


| 4000 


16384 | 


| 5000 


20480 | 


| 6000 


24576 | 


| 7000 


28672 | 


| 8000 


32768 | 


| 9000 


36864 | 


| A000 


40960 | 


| B000 


45056 | 


| cooo 


49152 | 


| DO 00 


53248 | 


| E000 


57344 | 


| F000 


61440 | 


l_ _ J 


L _ _ _ -J 
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x * 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


OOx 


0000 


0001 


0002 


0003 


0004 


0005 


0006 


0007 


0008 


0009 


0010 


0011 


0012 


0013 


0014 


0015 


01x 


0016 


0017 


0018 


0019 


0020 


0021 


0022 


0023 


0024 


0025 


0026 


0027 


0028 


0029 


0030 


0031 


02x 


0032 


0033 


0034 


0035 


0036 


0037 


0038 


0039 


0040 


0041 


0042 


0043 


0044 


0045 


0046 


00«7 


03x 


0048 


0049 


0050 


0051 


0052 


0053 


0054 


0055 


0056 


0057 


0058 


0059 


0060 


0061 


0062 


0063 


04 x 


006U 


0065 


0066 


0067 


0068 


0069 


0070 


0071 


0072 


0073 


0074 


0075 


0076 


0077 


0078 


0079 


05x 


0080 


0081 


0082 


0083 


0084 


0085 


0086 


0087 


0088 


0089 


0090 


0091 


0092 


0093 


0094 


0099 


06x 


0096 


0097 


0098 


0099 


0100 


0101 


0102 


0103 


0104 


0105 


0106 


0107 


0108 


0109 


0110 


0111 


07x 


0112 


0113 


0114 


0115 


0116 


0117 


0118 


0T19 


0120 


0121 


0122 


0123 


0124 


0125 


0126 


0127 


08x 


0128 


0129 


0130 


0131 


0132 


0133 


0134 


0135 


0136 


0137 


0138 


0139 


0140 


0141 


0142 


0143 


09x 


0144 


0145 


0146 


0147 


0148 


0149 


0150 


0151 


0152 


0153 


0154 


0155 


0156 


0157 


0158 


0153 


OAx 


0160 


0161 


0162 


0163 


0164 


0165 


0166 


0167 


0168 


0169 


0170 


0171 


0172 


0t73 


0174 


0175 


OBx 


0176 


0177 


0178 


0179 


0180 


0181 


0182 


0183 


0184 


0185 


0186 


0187 


0188 


0189 


0190 


0191 


OCx 


0192 


0193 


0194 


0195 


0196 


0197 


0198 


0199 


0200 


0201 


0202 


0203 


0204 


0205 


0206 


0207 


ODx 


0208 


0209 


0210 


0211 


0212 


0213 


0214 


0215 


0216 


0217 


0218 


0219 


0220 


0221 


0222 


0223 


OEx 


0224 


0225 


0226 


0227 


0228 


0229 


0230 


0231 


0232 


0233 


0234 


0235 


0236 


0237 


0238 


0239 


OFx 


0240 


0241 


0242 


0243 


0244 


0245 


0246 


0247 


0248 


0249 


0250 


0251 


0252 


0253 


0254 


0255 


10x 


0256 


0257 


0258 


0259 


0260 


0261 


0262 


0263 


0264 


0265 


0266 


0267 


0268 


0269 


0270 


0271 


11x 


0272 


0273 


0274 


0275 


0276 


0277 


0278 


0279 


0280 


0281 


0282 


0283 


0284 


0285 


0286 


0287 


12x 


0288 


0289 


0290 


0291 


0292 


0293 


0294 


0295 


0296 


0297 


0298 


0299 


0300 


0301 


0302 


0303 


13x 


0304 


0305 


0306 


0307 


0308 


0309 


0310 


0311 


0312 


0313 


0314 


0315 


0316 


0317 


0318 


0319 


14x 


0320 


0321 


0322 


0323 


0324 


0325 


0326 


0327 


0328 


0329 


0330 


0331 


0332 


0333 


0334 


0335 


15x 


0336 


0337 


0338 


0339 


0340 


0341 


0342 


0343 


0344 


0345 


0346 


0347 


0348 


0349 


0350 


0351 


16x 


0352 


0353 


0354 


0355 


0356 


0357 


0358 


0359 


0360 


0361 


0362 


0363 


0364 


0365 


0366 


0367 


17x 


0368 


0369 


0370 


0371 


0372 


0373 


0374 


0375 


0376 


0377 


0378 


0379 


0380 


0381 


0382 


0383 


18x 


0384 


0385 


0386 


0387 


0388 


0389 


0390 


0391 


0392 


0393 


0394 


0395 


0396 


0397 


0398 


0399 


19x 


0400 


0401 


0402 


0403 


0404 


0405 


0406 


0407 


0408 


0409 


0410 


0411 


0412 


0413 


0414 


0415 


lAx 


0416 


0417 


0418 


041* 


0420 


0421 


0422 


0423 


0424 


0425 


0426 


0427 


0428 


C429 


0430 


0431 


1Bx 


0432 


0433 


0434 


0435 


0436 


0437 


0438 


0439 


0440 


0441 


0442 


0443 


0444 


0445 


0446 


0447 


1Cx 


0448 


0449 


0450 


0451 


0452 


0453 


0454 


0455 


0456 


0457 


0458 


0459 


0460 


0461 


0462 


0463 


IDx 


0464 


0465 


0466 


0467 


0468 


0469 


0470 


0471 


0472 


0473 


0474 


0475 


0476 


0477 


0478 


0479 


1Ex 


0480 


0481 


0482 


04 83 


0484 


0485 


0486 


0487 


0488 


0489 


0490 


0491 


0492 


0493 


0494 


04*5 


1Fx 


0496 


0497 


0498 


04 99 


0500 


0501 


0502 


0503 


0504 


0505 


0506 


0507 


0508 


0509 


0510 


0511 


20x 


0512 


0513 


P514 


0515 


0516 


0517 


0518 


0519 


0520 


0521 


0522 


0523 


0524 


0525 


0526 


0527 


21x 


0528 


0529 


0530 


0531 


0532 


0533 


0534 


0535 


0536 


0537 


0538 


0539 


0540 


0541 


0542 


0543 


22x 


0544 


0545 


0546 


0547 


0548 


0549 


0550 


0551 


0552 


0553 


0554 


0555 


0556 


0557 


0558 


0559 


23x 


0560 


0561 


0562 


0563 


0564 


0565 


0566 


0567 


0568 


0569 


0570 


0571 


0572 


0573 


0574 


0575 


2*x 


0576 


0577 


0578 


0579 


0580 


0581 


0582 


0S83 


0584 


0585 


0586 


0587 


0588 


0589 


0590 


0591 


25x 


0592 


0593 


0594 


0595 


0596 


0597 


0598 


0599 


0600 


0601 


0602 


0603 


0604 


0605 


0606 


0607 


26x 


0608 


0609 


0610 


0611 


0612 


0613 


0614 


0615 


0616 


0617 


0618 


0619 


0620 


0621 


0622 


0623 


27x 


0624 


0625 


0626 


0627 


0628 


0629 


0630 


0631 


0632 


0633 


0634 


0635 


0636 


0637 


0638 


0639 


28x 


0640 


0641 


0642 


0643 


0644 


0645 


0646 


0647 


0648 


0649 


0650 


0651 


0652 


0653 


0654 


0655 


29x 


0656 


0657 


0658 


0659 


0660 


0661 


0662 


0663 


0664 


0665 


0666 


0667 


0668 


0669 


0670 


0671 


2Ax 


0672 


0673 


0674 


0675 


0676 


0677 


0678 


0679 


0680 


0681 


0682 


0683 


0684 


0685 


0686 


0687 


2Bx 


0688 


0689 


0690 


0691 


0692 


0693 


0694 


0695 


0696 


0697 


0698 


0699 


0700 


0701 


0702 


0703 


2Cx 


0704 


0705 


0706 


0707 


0708 


0709 


0710 


0711 


0712 


0713 


0714 


0715 


0716 


0717 


0718 


0719 


2Dx 


0720 


0721 


0722 


0723 


0724 


0725 


0726 


0727 


0728 


0729 


0730 


0731 


0732 


0733 


0734 


0735 


2Ex 


0736 


0737 


0738 


0739 


0740 


0741 


0742 


0743 


0744 


0745 


0746 


0747 


0748 


0749 


0750 


0751 


2Fx 


0752 


0753 


0754 


0755 


0756 


0757 


0758 


0759 


0760 


0761 


0762 


0763 


0764 


0765 


0766 


0767 


30x 


0768 


0769 


0770 


0771 


0772 


0773 


0774 


0775 


0776 


0777 


0778 


0779 


0780 


0781 


0782 


0783 


31x 


0784 


0785 


0786 


0787 


0788 


0789 


0790 


0791 


0792 


0793 


0794 


0795 


0796 


0797 


0798 


0799 


32x 


0800 


0801 


0802 


0803 


0804 


0805 


0806 


0807 


0808 


0809 


0810 


0811 


0812 


0813 


0814 


0815 


33x 


0816 


0817 


0818 


0819 


0820 


0821 


0822 


0823 


0824 


0825 


0826 


0827 


0828 


0829 


0830 


0831 


34x 


,0832 


0833 


0834 


0835 


0836 


0837 


0838 


0839 


0840 


0841 


0842 


0843 


0844 


0845 


0846 


0847 


35x 


0848 


0849 


0850 


0851 


0852 


0853 


0854 


0855 


0856 


0857 


0858 


0859 


0860 


0861 


0862 


0863 


36x 


0864 


0865 


0866 


0867 


0868 


0869 


0870 


0871 


0872 


0873 


0874 


087S 


0876 


0877 


0878 


0879 


37x 


0880 


0881 


0882 


0883 


0884 


0885 


0886 


0887 


0888 


0889 


0890 


0891 


0892 


0893 


0894 


0895 


38x 


0896 


0897 


0898 


0899 


0900 


0901 


0902 


0903 


0904 


0905 


0906 


0907 


0908 


0909 


0910 


0911 


39x 


0912 


0913 


0914 


0915 


0916 


0917 


0918 


0919 


0920 


0921 


0922 


0923 


0924 


0925 


0926 


0927 


3Ax 


0928 


0929 


0930 


0931 


0932 


0933 


0934 


0935 


0936 


0937 


0938 


0939 


0940 


0941 


0942 


0943 


3Bx 


0944 


0945 


0946 


0947 


0948 


0949 


0950 


0951 


0952 


09S3 


0954 


0955 


0956 


0957 


0958 


0959 


3Cx 


0960 


0961 


0962 


0963 


0964 


0965 


0966 


0967 


0968 


0969 


0970 


0971 


0972 


0973 


0974 


0975 


3Dx 


0976 


0977 


0978 


0979 


0980 


0981 


0982 


0983 


0984 


0985 


0986 


0987 


0988 


0989 


0990 


0991 


3Ex 


0992 


0993 


0994 


0995 


0996 


0997 


0998 


0999 


1000 


1001 


1002 


1003 


1004 


1005 


1006 


1007 


3Fx 


1008 


1009 


1010 


1011 


1012 


1013 


1014 


1015 


1016 


1017 


1018 


1019 


1020 


1021 


1022 


1023 



114 





x - 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


40x 
41x 
42x 
43x 


1021 
1040 
1056 
1072 


1025 
1041 
1057 
1073 


1026 
1042 
1058 
1074 


1027 
1043 
1059 
1075 


1028 
1044 
1060 
1076 


1029 
1045 
1061 
1077 


1030 
1046 
1062 
1078 


1031 
1047 
1063 
1079 


1032 
1048 
1064 
1080 


1033 
1049 
1065 
1081 


1034 
1050 
1066 
1082 


1035 
1051 
1067 
1083 


1036 
1052 
1068 
1084 


1037 
1053 
1069 
1085 


1038 
1054 
1070 
1086 


1039 
1055 
1071 
1087 


44x 
45x 

46x 
47x 


1088 
110H 
1120 
1136 


1089 
1105 
1121 
1137 


1090 
1106 
1122 
1138 


1091 
1107 
1123 
1139 


1092 
1108 
1124 
1140 


1093 
1109 
1125 
1141 


1094 
1110 
1126 
1142 


1095 
1111 
1127 
1143 


1096 
1112 
1128 
1144 


1097 
1113 
1129 
1145 


1098 
1114 
1130 
1146 


1099 
1115 
1131 
1147 


1100 
1116 
1132 
1148 


1101 
1117 
1133 
1149 


1102 
1118 
1134 
1150 


1103 
1119 
1135 
1151 


48x 

49x 
•AX 
4Bx 


1152 
1168 
1181 
1200 


1153 
1169 
1185 
1201 


1154 
1170 
1186 
1202 


1155 
1171 
1187 
1203 


1156 
1172 
1188 
1204 


1157 
1173 
1189 
1205 


1158 
1174 
1190 
1206 


1159 
1175 
1191 
1207 


1160 
1176 
1192 
1208 


1161 
1177 
1193 
1209 


1162 
1178 
1194 
1210 


1163 
1179 
1195 
1211 


1164 
1180 
1196 
1212 


1165 
1181 
1197 
1213 


1166 
1182 
1198 
1214 


1167 
1183 
1199 
1215 


4Cx 
4Dx 
•Ex 
4Fx 


1216 
1232 
1218 
1264 


1217 
1233 
1249 
1265 


1218 
1234 
1250 
1266 


1219 
1235 
1251 
1267 


1220 
1236 
1252 
1268 


1221 
1237 
1253 
1269 


1222 
1238 
1254 
1270 


1223 
1239 
125S 
1271 


1224 
1240 
1256 
1272 


1225 
1241 
1257 
1273 


1226 
1242 
1258 
1274 


1227 
1243 
1259 
1275 


1228 
1244 
1260 
1276 


1229 
1245 
1261 
1277 


1230 
1246 
1262 
1278 


1231 
1247 
1263 
1279 


50x 
51x 
52x 
53x 


1280 
1296 
1312 
1328 


1281 
1297 
1313 
1329 


1282 
1298 
1314 
1330 


1283 
1299 
1315 
1331 


1284 
1300 
1316 
1332 


1285 
1301 
1317 
1333 


1286 
1302 
1318 
1334 


1287 
1303 
1319 
1335 


1288 
1304 
1320 
1336 


1289 
1305 
1321 
1337 


1290 
1306 
1322 
1338 


1291 
1307 
1323 
1339 


1292 
1308 
1324 
1340 


1293 
1309 
132S 
1341 


1294 
1310 
1326 
1342 


1295 
1311 
1327 
1343 


54x 
55x 

56x 
57x 


1344 
1360 
1376 
1392 


1345 
1361 
1377 
1393 


1346 
1362 
1378 
1394 


1347 
1363 
1379 
1395 


1348 
1364 
1380 
1396 


1349 
1365 
1381 
1397 


1350 
1366 
1382 
1398 


1351 
1367 
1383 
1399 


1352 
1368 
1384 

1400 


1353 
1369 
1385 
1401 


1354 
1370 
1386 
1402 


1355 
1371 
1387 
1403 


1356 
137? 
1388 
1404 


1357 
1373 
1389 
1405 


1358 
1374 
1390 
1406 


1359 
1375 
1391 
1407 


58x 

Six 
5Ax 
SBx 


1408 
1424 
1440 
1456 


1409 
1425 
1441 
1457 


1410 
1426 
1442 
1458 


1411 
1427 
1443 
1459 


1412 
1428 
1444 
1460 


1413 
1429 
1445 
1461 


1414 
1430 
1446 
1462 


1415 
1431 
1447 
1463 


1416 
1432 
1448 
1464 


1417 
1433 
1449 
1465 


1418 
1434 
1450 
1466 


1419 
1435 
1451 
1467 


1420 
1436 
1452 
1468 


1421 
1437 
1453 
1469 


1422 
1438 
1454 
1470 


1423 
1439 
1455 
1471 


5Cx 
5Dx 
SBx 
5Px 


1472 
1488 
1504 
1520 


1473 
1489 
1505 
1521 


1474 
1490 
1506 
1522 


147S 
1491 
1507 
1523 


1476 
1492 
1508 
1524 


1477 
1493 
1509 
1525 


1478 
1494 
1510 
1526 


1479 
1495 
1511 
1527 


1480 
1496 
1512 
1528 


1481 
1497 
1513 
1529 


1482 
1498 
1514 
1530 


1483 
1499 
1515 
1531 


1484 
1500 
1516 
1532 


1485 
1501 
1517 
1533 


1486 
1502 
1518 
1534 


1487 
1503 
1519 
1535 


60x 
61x 
62x 
63x 


1536 
1552 
1568 
1584 


1537 
1553 
1569 
1585 


1538 
1554 
1570 
1586 


1539 
1555 
1571 
1587 


1540 
1556 
1572 
1588 


1541 
1557 
1573 
1589 


1542 
1558 
1574 
1590 


1543 
1559 
1575 
1S91 


1544 
1560 
1576 
1592 


1545 
1561 
1577 
1593 


1546 
1562 
1578 
1594 


1547 
1563 
1579 
1595 


1548 
1564 
1580 
1596 


1549 
1565 
1581 
1597 


1550 
1566 
1582 
1598 


1bb1 
1567 
1583 
1599 


64x 
65x 
66x 
67x 


1600 
1616 
1632 
1648 


1601 
1617 
1633 
1649 


1602 
1618 
1634 
1650 


1603 
1619 
1635 
1651 


1604 
1620 
1636 
1652 


1605 
1621 
1637 
1653 


1606 
1622 
1638 
1654 


1607 
1623 
1639 
1655 


1608 
1624 
1640 
1656 


1609 
1625 
1641 
1657 


1610 
1626 
1642 
1658 


1611 
1627 
1643 
1659 


1612 
1628 
1644 
1660 


1613 
1629 
1645 
1661 


1614 
1630 
1646 
1662 


1615 
1631 
1647 
1663 


68x 
69x 
6Ax 
6Bx 


1664 
1680 
1696 
1712 


1665 
1681 
1697 
1713 


1666 
1682 
1698 
1714 


1667 
1683 
1699 
1715 


1668 
1684 
1700 
1716 


1669 
1685 
1701 
1717 


1670 
1686 
1702 
1718 


1671 
1687 
1703 
1719 


1672 
1688 
1704 
1720 


1673 
1689 
1705 
1721 


1674 
1690 
1706 
1722 


1675 
1691 
1707 
1723 


1676 
1692 
1708 
1724 


1677 
1693 
1709 
1725 


1678 
1694 
1710 
1726 


1679 
1695 
1711 
1727 


6Cx 

6Dx 
6Ex 
6Fx 


1728 
1744 
1760 
1776 


1729 
1745 
1761 
1777 


1730 
1746 
1762 
1778 


17*31 
1747 
1763 
1779 


1732 
1748 
1764 
1780 


1733 
1749 
1765 
1781 


1734 
1750 
1766 
1782 


1735 
1751 
1767 
1783 


1736 
1752 
1768 
1784 


1737 
1753 
1769 
1785 


1738 
1754 
1770 
1786 


1739 
1755 
1771 
1787 


1740 
1756 
1772 
1788 


1741 
1757 
1773 
1789 


1742 
1758 
1774 
1790 


1743 
1759 
1775 
1791 


70x 
71x 
72x 
73x 


1792 
1808 
1824 
1840 


1793 
1809 
1825 
1841 


1794 
1810 
1826 
1842 


1795 
1811 
1827 
1843 


179* 
1812 
1828 
1844 


1797 
1813 
1829 
1845 


1798 
1814 
1830 
1846 


1799 
1815 
1831 
1847 


1800 
1816 
1832 
1848 


1801 
1817 
1833 
1849 


1802 
1818 
1834 
1850 


1803 
1819 
1835 
1851 


1804 
1820 
1836 
1852 


1805 
1821 
1837 
1853 


1806 
1822 
1838 
1854 


1807 
1823 
1839 
1855 


74x 
75x 
76x 
77x 


1856 
1872 
1888 
1904 


1857 
1873 
1889 
1905 


1858 
1874 
1890 
1906 


1859 
1875 
1891 
1907 


1860 
1876 
1892 
1908 


1861 
1877 
1893 
1909 


1862 
1878 
1894 
1910 


1863 
1879 
1895 
1911 


1864 
1880 
1896 
1912 


1865 
1881 
1897 
1913 


1866 
1882 
1898 
1914 


1867 
1883 
1899 
1915 


1868 
1884 
1900 
1916 


1869 
1885 
1901 
1917 


1870 
18U6 
1902 
1918 


1871 
1887 
1903 
1919 


78x 
79x 
7Ax 
7Bx 


1920 
1936 
1952 
1968 


1921 
1937 
1953 
1969 


1922 
1938 
1954 
1970 


1923 
1939 
1955 
1971 


1924 
1940 
1956 
1972 


1925 
1941 
1957 
1973 


1926 
1942 
1958 
1974 


1927 
1943 
1959 
1975 


1928 
1944 
1960 
1976 


1929 
1945 
1961 
1977 


1930 
1946 
1962 
1978 


1931 
1947 
1963 
1979 


1932 
1948 
1964 
1980 


1933 
1949 
1965 
1981 


1934 
1950 
1966 
1982 


1935 
1951 
1967 
1983 


7Cx 
7Dx 
7Bx 
7Px 


1984 
2000 
2016 
2032 


1985 
2001 
2017 
2033 


1986 
2002 
2018 
2034 


1987 
2003 
2019 
2035 


1988 
2004 
2020 
2036 


1989 
2005 
2021 
2037 


1990 
2006 
2022 
2038 


1991 
2007 
2023 
2039 


1992 
2008 
2024 
2040 


1993 
2009 
2025 
2041 


1994 
2010 
2026 
2042 


1995 
2011 
2027 
2043 


1996 
2012 
2028 
2044 


1997 
2013 
2029 
2045 


1998 
2014 
2030 
2046 


1999 
2015 
2031 
2047 
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x « 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


80x 
81x 
82x 
83x 


2048 
2064 
2080 
2096 


2049 
2065 
2081 
2097 


2050 
2066 
2082 
2098 


2051 
2067 
2083 
2099 


2052 
2068 
2084 
2100 


2053 
2069 
2085 
2101 


2054 
2070 
2086 
2102 


2055 
2071 
2087 
2103 


2056 
2072 
2088 
2104 


2057 
2073 
2089 
2105 


2058 
2074 
2090 
2106 


2059 
2075 
2091 
2107 


2060 
2076 
2092 
2108 


2061 
2077 
2093 
2109 


2062 
2078 
2094 
2110 


2063 
2079 
2095 
2111 


84x 

8Sx 
86x 
87x 


2112 
2128 
2144 
2160 


2113 
2129 
2145 
2161 


2114 
2130 
2146 
2162 


2115 
2131 
2147 
2163 


2116 
2132 
2148 
2164 


2117 
2133 
2149 
2165 


2118 
2134 
2150 
2166 


2119 
2135 
2151 
2167 


2120 
2136 
2152 
2168 


2121 
2137 
2153 
2169 


2122 
2138 
2154 
2170 


2123 
2139 
2155 
2171 


2124 
2140 
2156 
2172 


2125 
2141 
2157 
2173 


2126 
2142 
2158 
2174 


2127 
2143 
2159 
2175 


88x 

89x 
8Ax 
8Bx 


2176 
2192 
2208 
222* 


2177 
2193 
2209 
2225 


2178 
2194 
2210 
2226 


2179 
2195 
2211 
2227 


2180 
2196 
2212 
2228 


2181 
2197 
2213 
2229 


2182 
2198 
2214 
2230 


2183 
2199 
2215 
2231 


2184 
2200 
2216 
2232 


2185 
2201 
2217 
2233 


2186 
2202 
2218 
2234 


2187 
2203 
2219 
2235 


2188 
2204 
2220 
2236 


2189 
2205 
2221 
2237 


2190 
2206 
2222 
2238 


2191 
2207 
2223 
2239 


8Cx 
8Dx 
8Ex 
8Fx 


2240 
2256 
2272 
2288 


224.1 
2257 
2273 
2289 


2242 
2258 
2274 
2290 


2243 
2259 
227S 
2291 


2244 
2260 
2276 
2292 


2245 
2261 
2277 
2293 


2246 
2262 
2278 
2294 


2247 
2263 
2279 
2295 


2248 
2264 
2280 
2296 


2249 
2265 
2281 
2297 


2250 
2266 
2282 
2298 


2251 
2267 
2283 
2299 


2252 
2268 
2284 
2300 


2253 
2269 
2285 
2301 


2254 
2270 
2286 
2302 


2255 
2271 
2287 
2303 


90x 
Six 
92x 
93x 


2304 
2320 
2336 
2352 


2305 
2321 
2337 
2353 


2306 
2322 
2338 
2354 


2307 
2323 
2339 
2355 


2308 
2324 
2340 
2356 


2309 
2325 
2341 
2357 


2310 
2326 
2342 
2358 


2311 
2327 
2343 
2359 


2312 
2328 
2344 
2360 


2313 
2329 
2345 
2361 


2314 
2330 
2346 
2362 


2315 
2331 
2347 
2363 


2316 
2332 
2348 
2364 


2317 
2333 
2349 
2365 


2318 
2334 
2350 
2366 


2319 
2335 
2351 
2367 


94x 
95x 
96x 
97x 


2368 
2384 
2000 
2*16 


2369 
2385 
2401 
2417 


2370 
2386 
2402 
2418 


2371 
2387 
2403 
2419 


2372 
2388 
2404 
2420 


2373 
2389 
2405 
2421 


2374 
2390 
2406 
2422 


2375 
2391 
2407 
2423 


2376 
2392 
2408 
2424 


2377 
2393 
2409 
2425 


2378 
2394 
2410 
2426 


2379 
2395 
2411 
2427 


2380 
2396 
2412 
2428 


2381 
2397 
2413 
2429 


2382 
2398 
2414 
2430 


2383 
2399 
2415 
2431 


98x 

99x 
9Ax 

9£x 


2*32 
2**8 

2*6* 
2*80 


2433 
2449 
2465 
2481 


2434 
2450 
2466 
2482 


2435 
2451 
2467 
2483 


2436 
2452 
2468 
2484 


2437 
2453 
2469 
2485 


2438 
2454 
2470 
2486 


2439 
2455 
2471 
2487 


2440 
2456 
2472 
2488 


2441 
2457 
2473 
2489 


2442 
2458 
2474 
2490 


2443 
2459 
2475 
2491 


2444 
2460 
2476 
2492 


2445 
2461 
2477 
2493 


2446 
2462 
2478 
2494 


2447 
2463 
2479 
2495 


9Cx 
9Dx 
9Bx 
9Fx 


2*96 
2512 
2528 
2544 


2497 
2513 
2529 
2545 


2498 
2514 
2530 
2546 


2499 
2515 
2531 
2547 


2500 
2516 
2532 
2548 


2501 
2517 
2533 
2549 


2502 
2518 
2534 
2550 


2503 
2519 
2535 
2551 


2504 
2520 
2536 
2552 


2505 
2521 
2537 
2553 


2506 
2522 
2538 
2554 


2507 
2523 
2539 
2555 


2508 
2524 
2540 
2556 


2509 
2525 
2541 
2557 


2510 
2526 
2542 
2558 


2511 
2527 
2543 
2559 


AOx 
Alx 
A2x 
A3x 


2560 
2576 
2592 
2608 


2561 
2577 
2593 
2609 


2562 
2578 
2594 
2610 


2563 
2579 
2595 
2611 


2564 
2580 
2596 
2612 


2565 
2581 
2597 
2613 


2566 
2582 
2598 
2614 


2567 
2583 
2599 
2615 


2568 
2584 
2600 
2616 


2569 
2585 
2601 
2617 


2570 
2586 
2602 
2618 


2571 
2587 
2603 
2619 


2572 
2588 
2604 
2620 


2573 
2589 
2605 
2621 


2574 
2590 
2606 
2622 


2575 
2591 
2607 
2623 


Alx 
A5x 
A6x 
A7x 


2624 
2640 
2656 
2672 


2625 
2641 
2657 
2673 


2626 
2642 
2658 
2674 


2627 
2643 
2659 
2675 


2628 
2644 
2660 
2676 


2629 
2645 
2661 
2677 


2630 
2646 
2662 
2678 


2631 
2647 
2663 
2679 


2632 
2648 
2664 
2680 


2633 
2649 
2665 
2681 


2634 
2650 
2666 
2682 


2635 
2651 
2667 
2683 


2636 
2652 
2668 
2684 


2637 
2653 
2669 
2685 


2638 
2654 
2670 
2686 


2639 
2655 
2671 
2687 


A8x 
A9x 
AAx 

ABx 


2688 
2704 
2720 
2736 


2689 
2705 
2721 
2737 


2690 
2706 
2722 
2738 


2691 
2707 
2723 
2739 


2692 
2708 
2724 
2740 


2693 
2709 
2725 
2741 


2694 
2710 
2726 
2742 


2695 
2711 
2727 
2743 


2696 
2712 
2728 

2744 


2697 
2713 
2729 
2745 


2698 
2714 
2730 
2746 


2699 
2715 
2731 
2747 


2700 
2716 
2732 
2748 


2701 
2717 
2733 
2749 


2702 
2718 
2734 
2750 


2703 
2719 
2735 
2751 


ACx 
ADx 
AEx 
AFX 


2752 
2768 
2784 
2800 


2753 
2769 
2785 
2801 


2754 
2770 
2786 
2802 


2755 
2771 
2787 
2803 


2756 
2772 
2788 
2804 


2757 
2773 
2789 
2805 


2758 
2774 
2790 
2806 


2759 
2775 
2791 
2807 


2760 
2776 
2792 
2808 


2761 
2777 
2793 
2809 


2762 
2778 
2794 
2810 


2763 
2779 
2795 
2811 


276« 
2780 
2796 
2812 


-^765 
2781 
2797 
2813 


2766 
2782 
2798 
2814 


2767 
2783 
2799 
2815 


BOx 
B1x 
B2x 
B3x 


2816 
2832 
2848 
2864 


281* 
2833 
2849 
2865 


2818 
2834 
2850 
2866 


2819 
2835 
2851 
2867 


2820 
2836 
2852 
2868 


2821 
2837 
2853 
2869 


2622 
2838 
2854 
2870 


2823 
2839 
2855 
2871 


2824 
2840 
2856 
2872 


2825 
2841 
2857 
2873 


2826 
2842 
2858 
2874 


2827 
2843 
2859 
2875 


2828 
2844 
2860 
2876 


2829 
2845 
2861 
2877 


2830 
2846 
2862 
2878 


2831 
2847 
2863 
2679 


B4x 
BSx 
B6x 
B7x 


2880 
2896 
2912 
2928 


2881 
2897 
2913 
2929 


2882 
2898 
2914 
2930 


2883 
2899 
2915 
2931 


2884 
2900 
2916 
2932 


2885 
2901 
2917 
2933 


2886 
2902 
2918 
2934 


2887 
2903 
2919 
2935 


2888 
2904 
2920 
2936 


2889 
2905 
2921 
2937 


2890 
2906 
2922 
2938 


2891 
2907 
2923 
2939 


2892 
2908 
2924 
2940 


2893 
2909 
2925 
2941 


2894 
2910 
2926 
2942 


2895 
2911 
2927 
2943 


B8x 
B9x 
BAx 

BBx 


2944 
2960 
2976 
2992 


2945 
2961 
2977 
2993 


2946 
2962 
2978 
2994 


2947 
2963 
2979 
2995 


2948 
2964 
2980 
2996 


2949 
2965 
2981 
2997 


2950 
2966 
2982 
2998 


2951 
2967 
2983 
2999 


2952 
2968 
2984 
3000 


2953 
2969 
2985 
3001 


2954 
2970 
2986 
3002 


2955 
2971 
2987 
3003 


2956 
2972 
2988 
3004 


2957 
2973 
2989 
3005 


2958 
297* 
2990 
3006 


2959 
2975 
2991 
3007 


BCx 
BDx 
BEX 
BFx 


3008 
3024 
3040 
3056 


3009 
3025 
3041 
3057 


3010 
3026 
3042 
3058 


3011 
3027 
3043 
3059 


3012 
3028 
3044 
3060 


3013 
3029 
3045 
3061 


3014 
3030 
3046 
3062 


3015 
3031 
3047 
3063 


3016 
3032 
3048 
3064 


3017 
3033 
3049 
3065 


3018 
3034 
30S0 
3066 


3019 
3035 
3051 
3067 


3020 
3036 
3052 
3068 


3021 
3037 
3053 
3069 


302.. 
3038 
3054 
3070 


3023 
3039 
3055 
3071 



116 





x * 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 





E 


F 


COx 
C1x 
C2x 
C3x 


3072 
3088 
3104 
3120 


3073 
3089 
3105 
3121 


3074 
3090 
3106 
3122 


3075 
3091 
3107 
3123 


3076 
3092 
3108 
3124 


3077 
3093 
3109 
3125 


3078 
3094 
3110 
3126 


3079 
3095 
3111 
3127 


3080 
3096 
3112 
3128 


3081 
3097 
3113 
3129 


3082 
3098 
3114 
3130 


3083 
3099 
3115 
3131 


3084 
3100 
3116 
3132 


3101 
3117 
3133 


3086 
3102 
3118 
3134 


3087 
3103 
3119 
3135 


C4x 
C5x 
C6x 
C7* 


3136 
1152 
3168 
3184 


3137 
3153 
3169 
3185 


3138 
3154 
3170 
3186 


3139 
3155 
3171 
3187 


3140 
3156 
3172 
3188 


3141 
3157 
3173 
3189 


3142 
3158 
3174 
3190 


3143 
3159 
3175 
3191 


3144 
3160 
3176 
3192 


3145 
3161 
3177 
3193 


3146 
3162 
3178 
3194 


3147 
3163 
3179 
3195 


3148 
3164 
3180 
3196 


3149 
3165 
3181 
3197 


3150 
3166 
3182 
3198 


3151 
3167 
3183 
3199 


C8x 
C9x 
CAx 
CBx 


3200 
3216 
3232 
3248 


3201 
3217 
3233 

3249 


3202 
3218 
3234 
3250 


3203 
3219 
3235 
3251 


3204 
3220 
3236 
3252 


3205 
3221 
3237 
3253 


3206 
3222 
3238 
3254 


3207 
3223 
3239 
3255 


3208 
3224 
3240 
3256 


3209 
322S 
3241 
3257 


3210 
3226 
3242 
3258 


3211 
3227 
3243 
3259 


3212 
3228 
3244 
3260 


3213 
3229 
3245 
3261 


3214 
3230 
3246 
3262 


3215 
3231 
3247 
3263 


CCx 
CDx 
CEx 
CFx 


3264 
3280 
3296 
3312 


3265 
3281 
3297 
3313 


3266 
3282 
3298 
3314 


3267 
3283 
3299 
3315 


3268 
3284 
3300 
3316 


3269 
3285 
3301 
3317 


3270 
3286 
3302 
3318 


3271 
3287 
3303 
3319 


3272 
3288 
3304 
3320 


3273 
3289 
3305 
3321 


3274 
3290 
3306 
3322 


3275 
3291 
3307 
3323 


3276 
3292 
3308 
3324 


3277 
3293 
3309 
3325 


3278 
3294 
3310 
3326 


3279 
3295 
3311 
3327 


DOx 
D1x 
D2x 
03x 


3328 
3344 
3360 
3376 


3329 
3345 
3361 
3377 


3330 
3346 
3362 
3378 


3331 
3347 
3363 
3379 


3332 
3348 
3364 
3380 


3333 

3349 
3365 
3381 


3334 
3350 
3366 
3382 


3335 
3351 
3367 
3383 


3336 
3352 
3368 
3384 


3337 
3353 
3369 
3385 


3338 
3354 
3370 
3386 


3339 
3355 
3371 
3387 


3340 
3356 
3372 
3388 


3341 
3357 
3373 
3389 


3342 
3358 
3374 
3390 


3343 
3359 
3375 
3391 


DOx 
D5x 
D6x 
D7x 


3392 
3408 
3424 
3440 


3393 
3409 
3425 
3441 


3394 
3410 
3426 
3442 


3395 
3411 
3427 
3443 


3396 
3412 
3428 
3444 


3397 
3413 
3429 
3445 


3398 
3414 
3430 
3446 


3399 

3415 
3431 
3447 


3400 
3416 
3432 
3448 


3401 
3417 
3433 
3449 


3402 
3418 
3434 
3450 


3403 
3419 
3435 
3451 


3404 
3420 
3436 
3452 


3405 
3421 
3437 
3453 


3406 
3422 
3438 
3454 


3407 
3423 
3439 
3455 


D8x 
09x 
DAx 
DBx 


3456 
3472 
3488 
3504 


3457 
3473 
3489 
3505 


3458 
3474 
3490 
3506 


34 59 
3475 
3491 
3507 


3460 
3476 
3492 
3508 


3461 
3477 
3493 
3509 


3462 
3478 
3494 
3510 


3463 
3479 
3495 
3511 


3464 
3480 
3496 
3512 


3465 
3481 
3497 
3513 


3466 
3482 
3498 
3514 


3467 
3483 
3499 
3515 


3468 
3484 
3500 
3516 


3469 
3485 
3501 
3517 


3470 
3486 
3502 
3S18 


3471 
3487 
3503 
3519 


DCx 

DDx 
OEx 
DFx 


3520 
3536 
3552 
3568 


3521 
3537 
3553 
3569 


3522 
3538 
3554 
3570 


3523 
3539 
3555 
3571 


3524 
3540 
3556 
3572 


3525 
3541 
3557 
3573 


3526 
3542 
3558 
3574 


3527 
3543 
3559 
3575 


3528 
3544 
3560 
3576 


3529 
3545 
3561 
3577 


3530 
3546 
3562 
3578 


3531 
3547 
3563 
3579 


3532 
3548 
3564 
3580 


3533 
3549 
3565 
3581 


3534 
3550 
3566 
3582 


3535 
3551 
3567 
3583 


EOx 
Elx 
E2x 
E3x 


3584 
3600 
3616 
3632 


3585 
3601 
3617 
3633 


3586 
3602 
3618 
3634 


3587 
3603 
3619 
3635 


3588 
3604 
3620 
3636 


3589 
3605 
3621 
3637 


3590 
3606 
3622 
3638 


3591 
3607 
3623 
3639 


3592 
3608 
3624 
3640 


3593 
3609 
3625 
3641 


3594 
3610 
3626 
3642 


3595 
3611 
3627 
3643 


3596 
3612 
3628 
3644 


3597 
3613 
3629 
3645 


3598 
3614 
3630 
3646 


3599 
3615 
3631 
3647 


E4x 
ESx 
E6x 
E7x 


3648 
3664 
3680 
3696 


3649 
3665 
3681 
3697 


3650 
3666 
3682 
3698 


3651 
3667 
3683 
3699 


3652 
3668 
3684 
3700 


3653 
3669 
3685 
3701 


3654 
3670 
3686 
3702 


3655 
3671 
3687 
3703 


3656 
3672 
3688 
3704 


3657 
3673 
3689 
3705 


3658 
3674 
3690 
3706 


3659 
3675 
3691 
3707 


3660 
3676 
3692 
3708 


3661 
3677 
3693 
3709 


3662 
3678 
3694 
3710 


3663 
3679 
3695 
3711 


£8x 
E9x 
EAx 
EBx 


3712 
3728 
3744 
3760 


3713 
3729 
3745 
3761 


3714 
3730 
3746 
3762 


3715 
3731 
3747 
3763 


3716 
3732 
3748 
3764 


3717 
3733 
3749 
3765 


3718 
3734 
3750 
3766 


3719 
3735 
3751 
3767 


3720 
3736 
3752 
3768 


3721 
3737 
3753 
3769 


3722 
3738 
3754 
3770 


3723 
3739 
3755 
3771 


3724 
3740 
3756 
3772 


3725 
3741 
3757 
3773 


372* 
3742 
3758 
3774 


3727 
3743 
3759 
3775 


ECx 
EDx 
EEx 
EPx 


3776 
3792 
3808 
3824 


3777 
3793 
3809 
3825 


3778 
3794 
3810 
3826 


3779 
3795 
3811 
3827 


3780 
3796 
3812 
3828 


3781 
3797 
3813 
3829 


3782 
3798 
3814 
3830 


3783 
3799 
3815 
3831 


3784 
3800 
3816 
3832 


3785 
3801 
3817 
3833 


3786 
3802 
3818 
3834 


3787 
3803 
3819 
3835 


3788 
3804 
3820 
3836 


3789 
3805 
3821 
3837 


3790 
3806 
3822 
3838 


3791 
3807 
3823 
3839 


FOx 
Fix 
F2x 
F3x 


3840 
3856 
3872 
3888 


3841 
3857 
3873 
3889 


3842 
3858 
3874 
3890 


3843 
3859 
3875 
3891 


3844 
3860 
3876 
3892 


3845 
3861 
3877 
3893 


3846 
3862 
3878 
3894 


3847 
3863 
3879 
3895 


3848 
3864 
3880 
3896 


3849 
3865 
3881 
3897 


3850 
3866 
3882 
3898 


3851 
3867 
3883 
3899 


3352 
3868 
3884 
3900 


3853 
3869 
3885 
3901 


3854 
3870 
3886 
3902 


3855 
3871 
3887 
3903 


F4x 
F5x 
F6x 
F7x 


3904 
3*20 
3936 
3952 


390S 
3921 
3937 
3953 


3906 
3922 
3938 
3954 


3907 
3923 
3939 
3955 


3908 
3924 
3940 
3956 


3909 
3925 
3941 
3957 


3910 
3926 
3942 
3958 


3911 
3927 
3943 
3959 


3912 
3928 
3944 
3960 


3913 
3929 
3945 
3961 


3914 
3930 
3946 
3962 


3915 
3931 
3947 
3963 


3916 
3932 
3948 
3964 


3917 
3933 
3949 
3965 


3918 
3934 
3950 
3966 


3919 
3935 
3951 
3967 


F6x 
F9x 
FAX 
FBx 


3968 
3984 
4000 
4016 


3969 
3985 
4001 
4017 


3970 
3986 
4002 
4018 


3971 
3987 
4003 
4019 


3972 
3988 
4004 
4020 


3973 
3989 
4005 
4021 


3974 
3990 
4006 
4022 


3975 
3991 
4007 
4023 


3976 
3992 
4008 
4024 


3977 
3993 
4009 
4025 


3978 
3994 
4010 
4026 


3979 
3995 
4011 
4027 


3980 
3996 
4012 
4028 


3981 
3997 
4013 
4029 


3982 
3998 
4014 
4030 


3983 
3999 
4015 
4031 


PCX 
FDx 
FEx 
FFx 


4032 
4048 
4064 
4080 


4033 
4049 
4065 
4081 


4034 
4050 
4066 
4082 


4035 
4051 
4067 
4083 


4036 
4052 
4068 
4084 


4037 
4053 
4069 
4085 


4038 
4054 
4070 
4086 


4039 
4055 
4071 
4087 


4040 
4056 
4072 
4088 


4041 
4057 
4073 
4089 


4042 
4058 
4074 
4090 


4043 
4059 
4075 
4091 


4044 
4060 
4076 
4092 


4045 
4061 
4077 
4093 


4046 
4062 
4078 
4094 


4047 
4063 
4079 
4095 
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APPENDIX C: MACHINE-INSTRUCTION FORMAT 



BASIC MACHINE FORMAT 



ASSEMBLER OPERAND 
FIELD FORMAT 



APPLICABLE INSTRUCTIONS 



8 

Operation 

Code 


4 
Rl 


4 
R2 



RR 



8 

Operation 

Code 


4 
Ml 


4 
R2 



8 

Operation 
Code 


4 
Rl 





R1,R2 



M1,R2 



Rl 



8 

Operation 

Code 


8 

I 



(See Notes 1,6,8, 
and 9) 



All RR instructions 
except BCR,SPM, 
and SVC 



BCR 



SPM 



SVC 



RX 



8 


4 


4 


4 


12 


Operation 










Code 


Rl 


X2 


B2 


D2 



8 


4 


4 


4 


12 


Operation 










Code 


Ml 


X2 


B2 


D2 



R1,D2(X2,B2) 
R1,D2(,B2) 
R1,S2(X2) 
R1,S2 



M1,D2(X2,B2) 
M1,D2(,B2) 
M1,S2(X2) 
M1,S2 

(See Notes 1,6,8, 
and 9) 



All RX instructions 
except BC 



BC 



8 


4 


4 


4 


12 


Operation 










Code 


Rl 


R3 


B2 


D2 



RS 



8 


4 


4 


4 


12 


Operation 










Code 


Rl 




B2 


D2 



8 


4 


4 


4 


12 


Operation 










Code 


Rl 


M3 ■ 


B2 


D2 



R1,R3,D2(B2) 
R1,R3,S2 



R1,D2(B2) 
R1,S2 



R1,M3,D2(B2) 
R1,M3,S2 

(See Notes 1-3,7, 
8, and 9) 



BXH , BXLE , LM , STM , LCL , STCL 



All shift instructions 



ICM,STCM,CLM 
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BASIC MACHINE FORMAT 



ASSEMBLER OPERAND 
FIELD FORMAT 



APPLICABLE INSTRUCTIONS 



8 

Operation 
Code 


8 
12 


4 
Bl 


12 

Dl 



SI 



8 

Operation 

Code 




4 
Bl 


12 
Dl 



D1(B1) ,12 
SI, 12 



D1(B1) 

Si (See Notes 2,3,6, 
7,8 and 10) 



All SI instructions 
except those listed 
for other SI formats 



LPSW , SSM , TIO , TCH , TS 



16 


4 


12 


Two-byte 






Operation 






Code 


Bl 


Dl 



D1(B1) 
SI 



(See Notes 2, 
3, and 7) 



SCK,STCK,STIPD,SIOF, STIDC, 

SIO,HIO,HDV 

SCKC , STCKC , SPT , STPT , PTLB , 

RRB 



8 


4 


4 


4 


12 


4 


12 


Operation 














Code 


LI 


L2 


Bl 


Dl 


B2 


D2 



ss 



8 


8 


4 


12 


4 


12 


Operation 












Code 


L 


Bl 


Dl 


B2 


D2 



8 


4 


4 


4 


12 


4 


12 


Operation 














Code 


LI 


13 


Bl 


Dl 


B2 


D2 



D1(L1,B1) ,D2(L2,B2) 
S1(L1) ,S2(L2) 



D1(L,B1) ,D2(B2) 
S1(L) ,S2 



D1(L1,B1) ,D2(B2) ,13 
S1(L1) ,S2, 13 
S1,S2,I3 

(See Notes 2,3,5,6, 
7 and 10) 



PACK,UNPK,MVO,AP, 
CP,DP,MP,SP,ZAP 



NC,OC,XC,CLC,MVC,MVN, 
MVZ , TR , TRT , ED , EDMK 



SRP 



Notes for Appendix C : 

1. Rl, R2, and R3 are absolute expressions that specify general or floating-point reg- 
isters. The general register numbers are through 15 j floating-point register num- 
bers are 0, 2, 4, and 6. 

2. Dl and D2 are absolute expressions that specify displacements. A value of - 4095 
may be specified. 

3. Bl and B2 are absolute expressions that specify base registers. Register numbers are 
0-15. 

4. X2 is an absolute expression that specifies an index register. Register numbers are 
0-15. 

5. L, LI, and L2 are absolute expressions that specify field lengths. An L expression 
can specify a value of 1 - 256. Ll and L2 expressions can specify a value of 1 - 16. 
In all cases, the assembled value will be one less than the specified value. 

6. I, 12, and 13 are absolute expressions that provide immediate data. The value of I 
and 12 may be - 255. The value of 13 may be - 9 . 

7. SI and S2 are absolute or relocatable expressions that specify an address. 

8. RR, RS, and SI instruction fields that are blank under BASIC MACHINE FORMAT are not 
examined during instruction execution. The fields are not written in the symbolic 
operand, but are assembled as binary zeros, 

9. Ml and M3 specify a 4-bit mask. 

10. In IBM System/370 the SIO, HIO, HDV and SIOF operation codes occupy one byte and the 
low order bit of the second byte. In all other systems the HIO and SIO operation 
codes occupy only the first byte of the instruction. 
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APPENDIX D: MACHINE INSTRUCTION MNEMONIC OPERATION CODES 



This appendix contains two tables of the mnemonic operation codes for all machine 
instructions that can be represented in assembler language, including extended 
mnemonic operation codes. 

The first table is in alphabetic order by instruction. The second table is in numeric 
order by operation code. 

In the first table is indicated: both the mnemonic and machine operation codes, 
explicit and implicit operand formats, program interruptions possible, and condition 
code set. 

The column headings in the first table and the information each column provides follow: 

Instruction : This column contains the name of the instruction associated with the 
mnemonic operation code. 

Mnemonic Operation Code : This column contains the mnemonic operation code for the machine 
instruction. This is written in the operation field when coding the instruction. 

Machine Operation Code : This column contains the hexadecimal equivalent of the actual 
machine operation code. The operation code will appear in this form in most storage 
dumps and when displayed on the system control panel. For extended mnemonics, this 
column also contains the mnemonic code of the instruction from which the extended 
mnemonic is derived. 

O perand Format : This column shows the symbolic format of the operand field in both 
explicit and implicit form. For both forms, R1, R2, and R3 indicate general registers 
in operands one, two, and three respectively. X2 indicates a general register used as 
an index register in the second operand. Instructions which require an index register 
(X2) but are not to be indexed are shown with a replacing X2. L, L1, and L2 indicate 
lengths for either operand, operand one, or operand two respectively. M1 and V3 indicate 
a 4-bit mask in operand one and three, respectively. I, 12, and 13 indicate immediate 
data eight bits long (I and 12) or four bits long (13) . 

For the explicit format, D1 and D2 indicate a displacement and B1 and B2 indicate a 
base register for operands one and two. 

For the implicit format, D1, B1, and D2, B2 are replaced by S1 and S2 which indicate 
a storage address in operands one and two. 

Type of Instruction : This column gives the basic machine format of the instruction (RR, 
RX, SI, or SS) . If an instruction is included in a special feature or is an extended 
mnemonic, this is also indicated. 

Program Interruptions Possible : This column indicates the possible program interruptions 
for this instruction. The abbreviations used are: A - Addressing, S - Specification, 
Ov - Overflow, P - Protection, Op - Operation (if feature is not installed) , and Other 
- other interruptions which are listed. The type of overflow is indicated by: D - 
Decimal, E - Exponent, or F - Fixed Point. 

Condition Code Set : The condition codes set as a result of this instruction are indicated 
in this column. (See legend following the table.) 
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Instruction 


Mnemonic 

Operation 

Code 


Machine 

Operation 

Code 


Operand Format 
Explicit Implicit 


Add 

Add 

Add Decimal 

Add Halfword 

Add Logical 


A 

AR 

AP 

AH 

AL 


5A 
1A 
FA 
4A 
5E 


Rl,D2(X2,B2)or Rl, D2(,B2) 

R1,R2 

D1(L1,B1),D2(L2,B2) 

Rl,D2(X2,B2)orRl,D2(,B2) 

Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 

Sl(Ll),S2(L2)or S1,S2 
Rl,S2(X2)or R1,S2 
Rl,S2(X2)orRl,S2 


Add Logical 


ALR 


IE 


R1,R2 




Add Normalized, Extended 


AXR 


36 


R1,R2 




Add Normalized, Long 
Add Normalized, Long 
Add Normalized, Short 
Add Normalized, Short 


AD 
ADR 
AE 
AER 


6A 
2A 
7A 
3A 


Rl,D2(X2,B2)orRl,D2(,B2) 
R1,R2 

Rl,D2(X2,B2)orRl,D2(,B2) 
R1,R2 


Rl,S2(X2)or R1,S2 
Rl,S2(X2)orRl,S2 


Add Unnormalized, Long 
Add Unnormalized, Long 
Add Unnormalized, Short 
Add Unnormalized, Short 
And Logical 


AW 

AWR 

AU 

AUR 

N 


6E 
2E 
7E 
3E 
54 


Rl,D2(X2,B2)orRl,D2(,B2) 

R1,R2 

Rl,D2(X2,B2)orRl,D2(,B2) 

R1,R2 

Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 
Rl,S2(X2)orRl,S2 
Rl,S2(X2)orR1,S2 


And Logical 
And Logical 
And Logical Immediate 


NC 
NR 
Nl 


D4 
14 
94 


D1(L,B1),D2(B2) 
R1,R2 
D1(B1), 12 


S1(L),S2 or S1,S2 
SI, 12 


Branch and Link 
Branch and Link 


BAL 
BALR 


45 
05 


Rl,D2(X2,B2)orRl,D2(,B2) 
R1,R2 


Rl,S2(X2)orRl,S2 


Branch on Condition 
Branch on Condition 
Branch on Count 
Branch on Count 
Branch on Equal 


BC 

BCR 

BCT 

BCTR 

BE 


47 
07 
46 
06 
47 (BC 8) 


Ml,D2(X2,B2)orMl,D2(,B2) 

M1,R2 

Rl,D2(X2,B2)orRl,D2(,B2) 

R1,R2 

D2(X2,B2)orD2(,B2) 


Ml,S2(X2)orMl,S2 
Rl,S2(X2)orR1,S2 
S2(X2) or S2 


Branch on High 


BH 


47 (BC 2) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch in Index High 
Branch on Index Low or Equal 
Branch on Low 


BXH 
BXLE 
BL 


86 
87 
47(BC 4) 


R1,R3,D2(B2) 
R1,R3,D2(B2) 
D2(X2,B2)orD2(,B2) 


R1,R3,S2 
R1,R3,S2 
S2(X2) or S2 


Branch if Mixed 


BM 


47 (BC 4) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Minus 


BM 


47 (BC 4) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Equal 


BNE 


47 (BC 7) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not High 


BNH 


47 (BC 13) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Low 


BNL 


47 (BC 11) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Minus 


BNM 


47 (BC 11) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Ones 


BNO 


47(BC 14) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Plus 


BNP 


47 (BC 13) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Not Zeros 


BNZ 


47(BC 7) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch if Ones 


BO 


47(BC 1) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Overflow 


BO 


47(BC 1) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch on Plus 


BP 


47(BC 2) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch if Zeros 


BZ 


47(BC 8) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Zero 


BZ 


47(BC 8) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


Branch Unconditional 
Branch Unconditional 


B 
BR 


47 (BC 15) 
07 (BCR 15) 


D2(X2,B2)orD2(,B2) 
R2 


S2(X2) or S2 


Compare Algebraic 
Compare Algebraic 
Compare Decimal 
Compare Halfword 
Compare Logical 


C 

CR 

CP 

CH 

CL 


59 
19 
F9 
49 
55 


Rl,D2(X2,B2)orRl,D2(,B2) 

R1,R2 

D1(L1,B1),D2(L2,B2) 

Rl,D2(X2,B2)orRl,D2(,B2) 

Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2 or R1,S2 

Sl(Ll),S2(L2)or SI , S2 
Rl,S2(X2)or R1,S2 
Rl,S2(X2)or R1,S2 


Compare Logical 


CLC 


D5 


D1(L,B1),D2(B2) 


S1(L),S2 or S1,S2 
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Instruction 


Type of 
Instruction 


Program Interruption 
Possible 


Condition Code Set 


A 


S 


Ov 


P 


Op 


Other 


00 


01 


10 


11 


Add 

Add 

Add Decimal 

Add Halfword 

Add Logical 


RX 

RR 

SS, Decimal 

RX 

RX 


X 

X 
X 

X 


X 

X 

X 


F 
F 
D 
F 


X 


X 


Data 


Sum=0 
Sum=0 
Sum=0 
Sum=0 
Sum=0(8) 


Sum<0 
Sum<0 
Sum<0 
Sum<0 
Sum 0© 


Sum>0 
Sum>0 
Sum>0 
Sum>0 
Sum= 0© 


Overflow 
Overflow 
Overflow 
Overflow 
Sum 0® 


Add Logical 


RR 














Sum=0(8) 


Sum= 0® 


Sum= 0(D 


Sum 0® 


Add Normalized, Extended 


RR,Floating Pt. 




X 


E 




X 


B,C 


R 


L 


M 




Add Normalized, Long 
Add Normalized, Long 
Add Normalized, Short 
Add Normalized, Short 


RX, Floating Pt. 
RR, Floating Pt. 
RX, Floating Pt. 
RR, Floating Pt. 


X 
X 


X 
X 
X 
X 


E 
E 
E 
E 




X 
X 
X 
X 


B,C 
B,C 
B,C 
B,C 


R 
R 
R 
R 


L 
L 
L 
L 


M 
M 
M 
M 




Add Unnormalized,Long 
Add Unnormolized, Long 
Add Ur. normalized, Short 
Add Unnormolized, Short 
And Logical 


RX, Floating Pt. 
RR, Floating Pt. 
RX, Floating Pt. 
RR, Floating Pt. 
RX 


X 
X 
X 


X 
X 
X 
X 
X 


E 
E 
E 
E 




X 
X 
X 
X 


C 
C 
C 
C 


R 
R 
R 
R 
J 


L 
L 
L 
L 
K 


M 
M 
M 
M 




And Logical 
And Logical 
And Logical Immediate 


SS 

RR 
SI 


X 
X 






X 
X 






J 
J 
J 


K 
K 
K 






Branch and Link 
Branch and Link 


RX 

RR 














N 
N 


N 
N 


N 
N 


N 
N 


Branch on Condition 
Branch on Condition 
Branch on Count 
Branch on Count 
Branch on Equal 


RX 
RR 
RX 

RR 

RX,Ext. Mnemonic 














N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


Branch on High 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Index High 
Branch on Index Low or Equal 
Branch on Low 


RS 
RS 

RX , Ex t . Mnemon i c 














N 
N 
N 


N 
N 
N 


N 
N 
N 


N 
N 
N 


Branch if Mixed 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Minus 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Equal 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not High 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Low 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Minus 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Ones 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Plus 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Zeros 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch if Ones 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Overflow 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Plus 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch if Zeros 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Zero 


RX, Ext . Mnemoni c 














N 


N 


N 


N 


Branch Unconditional 
Branch Unconditional 


RX, Ext. Mnemonic 
RR, Ext. Mnemonic 














N 
N 


N 
N 


N 
N 


N 
N 


Compare Algebraic 
Compare Algebraic 
Compare Decimal 
Compare Halfword 
Compare Logical 


RX 

RR 

SS, Decimal 

RX 

RX 


X 

X 
X 
X 


X 

X 
X 






X 


Data 


Z 
Z 

z 
z 
z 


AA 
AA 
AA 
AA 
AA 


BB 
BB 
BB 
BB 
BB 




Compare Logical 


SS 


X 


X 










z 


AA 


BB 
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Instruction 


Mnemonic 
Operation 


Machine 
Operation 


Operand Format 






Code 


Code 


Explicit 


Implicit 


Compare Logical 


CLR 


15 


R1,R2 






Compare Logical 


CLM 


BD 


R1,M3,D2(B2) 


R1,M3,S2 




Characters under 












Mask 












Compare Logical Immediate 


CLI 


95 


D1(B1),I2 


SI, 12 




Compare Logical Long 


CLCL 


OF 


R1,R2 






Compare , Long 


CD 


69 


Rl ,D2(X2, B2)or Rl, D2(,B2) 


Rl , S2(X2)or 


R1,S2 


Compare, Long 


CDR 


29 


R1,R2 






Compare, Short 


CE 


79 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl , S2(X2)or 


R1,S2 


Compare, Short 


CER 


39 


R1,R2 






Convert to Binary 


CVB 


4F 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or 


R1,S2 


Convert to Decimal 


CVD 


4E 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or 


R1,S2 


Divide 


D 


5D 


Rl,D2(X2,B2)or R1,D2(,B2) 


Rl, S2(X2) 


or R1,S2. 


Divide 


DR 


ID 


R1,R2 






Divide Decimal 


DP 


FD 


D1,(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Divide, Long 


DD 


6D 


Rl,D2(X2,B2),orRl,D2(,B2) 


R1,S2(X2) 


orRl,S2 


Divide, Long 


DDR 


2D 


R1,R2 






Divide, Short 


DE 


7D 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Divide, Short 


DER 


3D 


RI,R2 






Edit 


ED 


DE 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Edit and Mark 


EDMK 


DF 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Exclusive Or 


X 


57 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Exclusive Or 


XC 


D7 


D1(L,B1),D2(B2) 


S1{L),S2 


or S1,S2 


Exclusive Or 


XR 


17 


R1,R2 






Exclusive Or Immediate 


XI 


97 


D1(B1), 12 


SI, 12 




Execute 


EX 


44 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


R1,S2 


Halve, Long 


HDR 


24 


R1,R2 






Halve, Short 


HER 


34 


R1,R2 






Halt Device 


HDV 


9E01 1 


D1,B1 


SI 




Halt I/O 


HIO 


9E00 1 


DI(B1) 






Insert Character 


IC 


43 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Insert Characters 


ICM 


BF 


R1,M3,D2(B2) 


R1,M3,S2 




under Mask 












Insert Storage Key 


ISK 


09 


R1,R2 






Load 


L 


58 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load 


LR 


18 


R1,R2 






Load Address 


LA 


41 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load and Test 


LTR 


12 


R1,R2 






Load and Test, Long 


LTDR 


22 


R1,R2 






Load and Test, Short 


LTER 


32 


R1,R2 






Load Complement 


LCR 


13 


R1,R2 






Load Complement, Long 


LCDR 


23 


R1,R2 






Load Complement, Short 


LCER 


33 


R1,R2 






Load Control 


LCTL 


B7 


R1,R3,D2(B2) 


R1,R3,S2 




Load Halfword 


LH 


48 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load, Long 


LD 


68 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


or Rl , S2 


Load, Long 


LDR 


28 


R1,R2 






Load Multiple 


LM 


98 


R1,R3,D2(B2) 


R1,R3,S2 




Load Negative 


LNR 


11 


R1,R2 






Load Negative, Long 


LNDR 


21 


R1,R2 






Load Negative, Short 


LNER 


31 


R1,R2 






Load Positive 


LPR 


10 


R1,R2 






Load Positive, Long 


LPDR 


20 


R1,R2 






Load Positive, Short 


LPER 


30 


R1,R2 






Load PSW 


LPSW 


82 


D1(B1) 


SI 




Load Real Address 


LRA 


B1 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Load Rounded, Extended 


LRDR 


25 


R1,R2 






to Long 












Load Rounded, Long to 

Short 

Load, Short 


LRER 


35 


Rl , R2 






LE 


78 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load, Short 


LER 


38 


R1,R2 






Monitor Call 


MC 


AF 


D1(B1),I2 


SI, 12 




Move Characters 


MVC 


D2 


D1(L,B1),D2(B2) 


S1(L),S2 


or SI , S2 


Move Immediate 


MVI 


92 


D1(B1), 12 


SI, 12 





See Note 1 at end of 
this appendix 



124 





Type of 
Instruction 


Program Interruptions 










Instruction 


Possible 




Condition Code Set 




A 


S 


cv 


p 


Op 


Other 


00 


01 


10 


11 


Compare Logical 


RR 


X 












Z 


AA 


BB 




Compare Logical 


RS 


X 






X 


X 




XX 


YY 


zz 




Characters under 
























Mask 
























Compare Logical Immediate 


SI 


X 












z 


AA 


BB 




Compare Logical Long 


RR 


X 


X 




X 


X 




z 


AA 


BB 




Compare, Long 


RX, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Long 


RR, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Short 


RX, Floating Pt. 


X 


X 






X 




z 


AA 


BB 




Compare, Short 


RR, Floating Pt. 




X 






X 




z 


AA 


BB 




Convert to Binary 


RX 


X 


X 








Data, F 


N 


N 


N 


N 


Convert to Decimal 


RX 


X 


X 




X 






N 


N 


N 


N 


Divide 


RX 


X 


X 








F 


N 


N 


N 


N 


Divide 


RR 




X 








F 


N 


N 


N 


N 


Divide Decimal 


SS, Decimal 


X 


X 




X 


X 


D, Data 


N 


N 


N 


N 


Divide, Long 


RX,Floating Pt. 


X 


X 


E 




X 


B,E 


N 


N 


N 


N 


Divide, Long 


RR, Floating Pt. 




X 


E 




X 


B,E 


N 


N 


N 


N 


Divide, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B,E 


N 


N 


N 


N 


Divide, Short 


RR, Floating Pt. 




X 


E 




X 


B,E 


N 


N 


N 


N 


Edit 


SS, Decimal 


X 






X 


X 


Data 


S 


T 


U 




Edit and Mark 


SS, Decimal 


X 






X 


X 


Data 


S 


T 


U 




Exclusive Or 


RX 


X 


X 










J 


K 






Exclusive Or 


SS 


X 






X 






J 


K 






Exclusive Or 


RR 














J 


K 






Exclusive Or Immediate 


SI 


X 






X 






J 


K 






Execute 


RX 


X 


X 








G 


(May be 


set by this instruction) 




Halve, Long 


RR, Floating Pt. 




X 






X 




N 


N 


N 


N 


Halve, Short 


RR, Floating Pt. 




X 






X 




N 


N 


N 


N 


Halt Device 


S 












A 


AAM 


cc 


AAL 




Halt I/O 


S 












A 


DD 


cc 


GG 


KK 


Insert Character 


RX 


X 












N 


N 


N 


N 


Insert Characters under 


RS 


X 






X 


X 




UU 


TT 


SS 




Mask 
























Insert Storage Key 


RR 


X 


X 






X 


A 


N 


N 


N 


N 


Load 


RX 


X 


X 










N 


N 


N 


N 


Load 


RR 














N 


N 


N 


N 


Load Address 


RX 














N 


N 


N 


N 


Load and Test 


RR 














J 


L 


M 




Load and Test, Long 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load and Test, Short 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Complement 


RR 






F 








P 


L 


M 


O 


Load Complement, Long 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Complement, Short 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Control 


RS 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Load Halfword 


RX 


X 


X 










N 


N 


N 


N 


Load, Long 


RX, Floating Pt. 


X 


X 






X 




N 


N 


N 


N 


Load, Long 


RR, Floating Pt. 




X 






X 




N 


N 


N 


N 


Load Multiple 


RS 


X 


X 










N 


N 


N 


N 


Load Negative 


RR 














J 


L 






Load Negative, Long 


RR, Floating Pt. 




X 






X 




R 


L 






Load Negative, Short 


RR, Floating Pt. 




X 






X 




R 


L 






Load Positive 


RR 






F 








J 




M 


O 


Load Positive, Long 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load Positive, Short 


RR, Floating Pt. 




X 






X 




R 


L 


M 




Load PSW 


SI 


X 


X 








A 


QQ 


QQ 


QQ 


QQ 


Load Real Address 


RX 


X 


X 






X 


A 


AAV 


AAU 


AAP 


AAO 


Load Rounded, Extended 


RR, Floating Pt. 




X 


E 




X 




N 


N 


N 


N 


to Long 
























Load Rounded, Long to 


RR, Floating Pt. 




X 


E 




X 




N 


N 


N 


N 


Short 
























Load, Short- 


RX, Floating Pt. 


X 


X 






X 




N 


N 


N 


N 


Load, Short 


RR, Floating Pt. 




X 






X 




N 


N 


N 


N 


Monitor Call 


SI 




X 






X 


GA 


N 


N 


N 


N 


Move Characters 


SS 


X 






X 






N 


N 


N 


N 


Move Immediate 


SI 


X 






X 






N 


N 


N 


N 
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Mnemonic 


Machine 


Operand Format 


Instruction 


Operation 
Code 


Operation 
Code 


Explicit 


Implicit 


Move Long 


MVCL 


OE 


R1,R2 




Move Numerics 


MVN 


Dl 


D1(L,B1),D2(B2) 


S1(L),S2 orSl,S2 


Move with Offset 


MVO 


FT 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)orSl,S2 


Move Zones 


MVZ 


D3 


D1(L,B1),D2(B2) 


S1(L),S2 orSl,S2 


Multiply 


M 


5C 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Multiply 


MR 


1C 


R1,R2 




Multiply Decimal 


MP 


FC 


D1(L1,B1),D2(L2,B2) 


S1(L1),S2(L2) or S1,S2 


Multiply Extended 


MXR 


26 


R1,R2 




Multiply Halfword 


MH 


4C 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Multiply, Long 


MD 


6C 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Multiply, Long 


MDR 


2C 


R1,R2 




Multiply, Long to 
Extended 
Multiply, Long to 


MXD 


67 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


MXDR 


27 


R1,R2 




Extended 










Multiply, Short 


ME 


7C 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1;S2(X2) oi R1,S2 


Multiply, Short 


MER 


3C 


R1,R2 




No Operation 


NOP 


47(BC 0) 


D2(X2,B2)orD2(,B2) 


S2(X2) or S2 


No Operation 


NO PR 


07(BC 0) 


R2 




Or Logical 


O 


56 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Or Logical 


OC 


D6 


D1(L,B1),D2(B2) 


S1(L),S2 orSl,S2 


Or Logical 


OR 


16 


R1,R2 




Or Logical Immediate 


Ol 


96 


D1(B1), 12 


SI, 12 


Pack 


PACK 


F2 


D1(L1,B1),D2(L2,B2) 


SI(Ll),S2(L2)orSl,S2 


Purge Translation Lookaside 


PTLB 


B20D 


_ 


_ 


Buffer 










Read Direct 


RDD 


85 


D1(B1), 12 


SI, 12 


Reset Reference Bit 


RRB 


B213 


D1(B1) 


SI 


Set Clock 


SCK 


B204 


D1(B1) 


SI 


Set Clock Comparator 


SCKC 


B206 


D1(B1) 


SI 


Set CPU Timer 


SPT 


B208 


D1(B1) 


SI 


Set Program Mask 


SPM 


04 


Rl 




Set Storage Key 


SSK 


08 


R1,R2 




Set System Mask 


SSM 


80 


D1(B1) 


SI 


Shift and Round Decimal 


SRP 


F0 


D1(L1,B1),D2(B2),I3 


S1(L1),S2,I3 or S1,S2,I3 


Shift Left Double Algebraic 


SLDA 


8F 


R1,D2(B2) 


R1,S2 


Shift Left Double Logical 


SLDL 


8D 


R1,D2(B2) 


R1,S2 


Shift Left Single Algebraic 


SLA 


8B 


R1,D2(B2) 


R1,S2 


Shift Left Single Logical 


SLL 


89 


R1,D2(B2) 


R1,S2 


Shift Right Double Algebraic 


SRDA 


8E 


R1,D2(B2) 


R1,S2 


Shift Right Double Logical 


SRDL 


8C 


R1,D2(B2) 


R1,S2 


Shift Right Single Algebraic 


SRA 


8A 


R1,D2(B2) 


R1,S2 


Shift Right Single Logical 


SRL 


88 


R1,D2(B2) 


R1,S2 


Start I/O 


SIO 


9C00 1 , 


D 1 (B 1 ) 


SI 


Start I/O Fast Release 


SIOF 


9C01 1 


D1(B1) 


SI 


Store 


ST 


50 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Store Channel ID 


STIDC 


B203 


D1(B1) 


SI 


Store Character 


STC 


42 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,D2(X2) orRl,S2 


Store Characters under 


STCM 


BE 


R1,M3,D2(B2) 


R1,M3,S2 


Mask 










Store Clock 


STCK 


B205 


D 1 (B 1 ) 


SI 


Store Clock Comparator 


STCKC 


B207 


D1(B1) 


SI 


Store Control 


STCTL 


B6 


R1,R3,D2(B2) 


R1,R3,S2 


Store CPU ID 


STIDP 


B202 


D1(B1) 


SI 


Store CPU Timer 


STPT 


B209 


D](B1) 


SI 


Store Halfword 


STH 


40 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Store Long 


STD 


60 


R1,D2(X2,B2) 


R1,S2(X2) orRl,S2 


Store Multiple 


STM 


90 


R1,R2,D2(B2) 


R1,R2,S2 


Store Short 


STE 


70 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRl,S2 


Store Then AND System Mask 


STNSM 


AC 


D1(B1),I2 


SI, 12 


Store Then OR System Mask 


STOSM 


AD 


D1(B1), 12 


SI, 12 


Subtract 


S 


5B 


Rl,D2(X2)or R1,D2(X2,B2) 


R1,S2(X2) orRl,S2 


Subtract 


SR 


IB 


R1,R2 




Subtract Decimal 


SP 


FB 


D1(L1,B1),D2(L2,B2) 


Sl(L1),S2(L2)or S1,S2 


Subtract Halfword 


SH 


4B 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) or R1,S2 


Subtract Logical 


SL 


5F 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) orRI,S2 


Subtract Logical 


SLR 


IF 


R1,R2 





See Note 2 at end of 
this appendix 
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Program Interruptions 








■ 


Instruction 


Type of 


Possibl 


e 






Condition Code Set 






Instruction 


A 


s 


Ov 


P 


Op 


Other 


00 


01 


10 


11 


Move Long 


RR 


X 


X 




X 


X 




AAA 


AAB 


AAC 


AAD 


Move Numerics 


SS 


X 






X 






N 


N 


N 


N 


Move with Offset 


SS 


X 






X 






N 


N 


N 


N 


Move Zones 


SS 


X 






X 






N 


N 


N 


N 


Multiply 


RX 


X 


X 










N 


N 


N 


N 


Multiply 


RR 




X 










N 


N 


N 


N 


Multiply Decimal 


SS, Decimal 


X 


X 




X 


X 


Data 


N 


N 


N 


N 


Multiply Extended 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


Multiply Halfword 


RX 


X 


X 










N 


N 


N 


N 


Multiply, Long 


RX, Floating Pt. 


X 


X 


E 




X 


B 


N 


N 


N 


N 


Multiply, Long 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


Multiply, Long/ 


RX, Floating Pt. 


X 


X 


E 


X 


X 


B 


N 


N 


N 


N 


Extended 
























Multiply, Long/ 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


Extended 
























Multiply, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B 


N 


N 


N 


N 


Multiply, Short 


RR, Floating Pt. 




X 


E 




X 


B 


N 


N 


N 


N 


No Operation 


RX, Ext. Mnemonic 














N 


N 


N 


N 


No Operation 


RR, Ext. Mnemonic 














N 


N 


N 


N 


Or Logical 


RX 


X 


X 










J 


K 






Or Logical 


SS 


X 






X 






J 


K 






Or Logical 


RR 














J 


K 






Or Logical Immediate 


SI 


X 






X 






J 


K 






Pack 


SS 


X 






X 






N 


N 


N 


N 


Purge Translation Lookaside 


S 










X 


A 


N 


N 


N 


N 


Buffer 
























Read Direct 


SI 


X 






X 


X 


A 


N 


N 


N 


N 


Reset Reference Bit 


S 










X 


A 


AAQ 


AAR 


AAS 


AAT 


Set Clock 


s 


X 


X 




X 


X 


A 


AAE 


AAF 




AAG 


Set Clock Comparator 


s 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Set CPU Timer 


s 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Set Program Mask 


RR 














RR 


RR 


RR 


RR 


Set Storage Key 


RR 


X 


X 






X 


A 


N 


N 


N 


N 


Set System Mask 


SI 


X 










A 


N 


N 


N 


N 


Shift Left Double Algebraic 


RS 




X 


F 








J 


L 


M 


O 


Shift and Round Decimal 


SS 


X 




D 


X 


X 


Data 


J 


L 


M 


O 


Shift Left Double Logical 


RS 




X 










N 


N 


N 


N 


Shift Left Single Algebraic 


RS 






F 








J 


L 


M 


O 


Shift Left Single Logical 


RS 














N 


N 


N 


N 


Shift Right Double Algebraic 


RS 




X 










J 


L 


M 




Shift Right Double Logical 


RS 




X 










N 


N 


N 


N 


Shift Right Single Algebraic 


RS 














J 


L 


M 




Shift Right Single Logical 


RS 














N 


N 


N 


N 


Start I/O 


S 












A 


MM 


CC 


EE 


KK 


.Start I/O Fast Release 


S 












A 


MM 


CC 


EE 


KK 


Store 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Channel ID 


S 










X 


A 


AAH 


CC 


AAI 


KK 


Store Character 


RX 


X 






X 






N 


N 


N 


N 


Store Characters under 


RS 


X 






X 


X 




N 


N 


N 


N 


Mask 
























Store Clock 


S 


X 






X 


X 




AAJ 


AAK 


AAN 


AAG 


Store Clock Comparator 


S 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Store Control 


RS 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Store CPU ID 


S 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Store CPU Timer 


S 


X 


X 




X 


X 


A 


N 


N 


N 


N 


Store Halfword 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Long 


RX, Floating Pt. 


X 


X 




X 


X 




N 


N 


N 


N 


Store Multiple 


RS 


X 


X 




X 






N 


N 


N 


N 


Store Short 


RX, Floating Pt. 


X 


X 




X 


X 




N 


N 


N 


N 


Store Then AND System Mask 


SI 


X 






X 


X 


A 


N 


N 


N 


N 


Store Then OR System Mask 


SI 


X 






X 


X 


A 


N 


N 


N 


N 


Subtract 


RX 


X 


X 


F 








V 


X 


Y 


O 


Subtract 


RR 






F 








V 


X 


Y 


O 


Subtract Decimal 


SS, Decimal 


X 




D 


X 


X 


Data 


V 


X 


Y 


O 


Subtract Halfword 


RX 


X 


X 


F 








V 


X 


Y 


O 


Subtract Logical 


RX 


X 


X 












W,H 


v,i 


W,l 


Subtract Logical 


RR 
















W,H 


v,i 


W,l 
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Mnemonic 


Machine 


Operand Format 


Instruction 


Operation 


Operation 








Code 


Code 


Explicit 


Implicit 


Subtract Normalized, 


SXR 


37 


R1,R2 




Extended 










Subtract Normalized, Long 


SD 


6B 


Rl,D2(X2,B2)orR1,D2(,B2) 


R1,S2(X2) orRl,S2 


Subtract Normalized, Long 


SDR 


2B 


R1,R2 




Subtract Normalized, Short 


SE 


7B 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) orRl,S2 


Subtract Normalized, Short 


SER 


3B 


R1,R2 




Subtract Unnormalized, Long 


SW 


6F 


R1,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) orRT,S2 


Subtract Unnormalized, Long 


SWR 


2F 


R1,R2 




Subtract Unnormalized, Short 


SU 


7F 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) orRl,S2 


Subtract Unnormalized, Short 


SUR 


3F 


R1,R2 




Supervisor Call 


SVC 


OA 


1 




Test and Set 


TS 


93 


D1(B1) 


SI 


Test Channel 


TCH 


9F 


D1(B1) 


SI 


Test I/O 


TIO 


9D 


D1(B1) 


SI 


Test Under Mask 


TM 


91 


D1(B1),I2 


SI, 12 


Translate 


TR 


DC 


D1(L,B1),D2(B2) 


S1(L),S2 orS1,S2 


Translate and Test 


TRT 


DD 


D1(L,B1),D2(B2) 


S1(L),S2 orS1,S2 


Unpack 


UNPK 


F3 


D1(LI,B1),D2(L2,B2) 


Sl(Ll),S2(L2)orSl,S2 


Write Direct 


WRD 


84 


D1(B1), 12 


SI, 12 


Zero and Add Decimal 


ZAP 


F8 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)orSl,S2 
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Instruction 


Type of 
Instruction 


Program Interruptions 
Possible 


Condition Code Set 




A 


S 


Ov 


P 


Op 


Other 


00 


01 


10 


11 


Subtract Normalized, 


RR, Floating Pt. 




X 


E 




X 


B,C 


R 


L 


M 




Extended 
























Subtract Normalized, Long 


RX, Floating Pt. 


X 


X 


E 




X 


B,C 


R 




M 


Q 


Subtract Normalized, Long 


RR,Floating Pt. 




X 


E 




X 


B,C 


R 




M 


Q 


Subtract Normalized, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B,C 


R 




M 


Q 


Subtract Normalized, Short 


RR, Floating Pt. 




X 


E 




X 


B,C 


R 




M 


Q 


Subtract Unnormalized, Long 


RX, Floating Pt. 


X 


X 


E 




X 


C 


R 




M 


Q 


Subtract Unnormalized, Long 


RR,Floating Pt. 




X 


E 




X 


C 


R 




M 


Q 


Subtract Unnormalized, Short 


RX, Floating Pt. 


X 


X 


E 




X 


C 


R 




M 


Q 


Subtract Unnormalized, Short 


RR, Floating Pt. 




X 


E 




X 


C 


R 




M 


Q 


Supervisor Call 


RR 














N 


N 


N 


N 


Test and Set 


SI 


X 






X 






SS 


TT 






Test Channel 


SI 












A 


JJ 


II 


FF ' 


HH 


Test I/O 


SI 












A 


LL 


CC 


EE 


KK 


Test Under Mask 


SI 


X 












UU 


VV 




WW 


Translate 


SS 


X 






X 






N 


N 


N 


N 


Translate and Test 


SS 


X 












PP 


NN 


OO 




Unpack 


SS 


X 






X 






N 


N 


N 


N 


Write Direct 


SI 


X 








X 


A 


N 


N 


N 


N 


Zero and Add Decimal 


SS, Decimal 


X 




D 


X 


X 


Data 


J 


L 


M 


O 



Program 


Interruptions Possible 


Under Ov: D = Decimal 




E - Exponent 




F = Fixed Point 


Under Other: 




A Privileged Operation 




B Exponent Underflow 




C Significance 




D Decimal Divide 




E Floating Point Divide 




F Fixed Point Divide 




G Execute 




GA Monitoring 


Condition Code Set 


H 


No Carry 


1 


Carry 


J 


Result = 


K 


Result is Not Equal to Zero 


L 


Result is Less Than Zero 


M 


Result is Greater Than Zero 


N 


Not Changed 


O 


Overflow 


P 


Result Exponent Underflows 


Q 


Result Exponent Overflows 


R 


Result Fraction = 


S 


Result Field Equals Zero 


T 


Result Field is Less Than Zero 


U 


Result Field is Greater Than Zero 


V 


Difference = 


W 


Difference is Not Equal to Zero 


X 


Difference is Less Than Zero 


Y 


Difference is Greater Than Zero 


Z 


First Operand Equals Second Operand 


AA 


First Operand is Less Than Second Operand 


BB 


First Operand is Greater Than Second Operand 


CC 


CSW Stored 


DD 


Channel and Subchannel not Working 


EE 


Channel or Subchannel Busy 


FF 


Channel Operating in Burst Mode 


GG 


Burst Operation Terminated 



HH Channel Not Operational 

II Interruption Pending in Channel 

J J Channel Available 

KK Not Operational 

LL Available 

MM I/O Operation Initiated and Channel Proceeding With 

its Execution 

NN Nonzero Function Byte Found Before the First Operand 

Field is Exhausted 

OO Last Function Byte is Nonzero 

PP All Function Bytes Are Zero 

QQ Set According to Bits 34 and 35 of the New PSW Loaded 

RR Set According to Bits 2 and 3 of the Register Specified by Rl 

SS Leftmost Bit of Byte Specified = 

TT Leftmost Bit of Byte Specified = 1 

UU Selected Bits Are All Zeros; Mask is All Zeros 

VV Selected Bits Are Mixed (aeros and ones) 

WW Selected Bits Are All Ones 

XX Selected bytes are equal, or mask is zero 

YY Selected field of first operand is low 

ZZ Selected field of first operand is high 

AAA First-operand and second-operand counts are equal 

AAB First operand count is lower 

AAC First operand count is higher 

AAD No movement because of destructive overlap 

AAE Clock value set 

AAF Clock value secure 

AAG Clock not operational 

AAH Channel ID correctly stored 

AAI Channel activity prohibited during ID 

AAJ Clock value is valid 

AAK Clock value not necessarily valid 

AAL Channel working with another device 

AAM Subchannel busy or interruption pending 

AAN Clock in error state 

AAO Segment- or Page-Table Length Violation 

AAP Page-Table Entry Invalid (1-Bit One) 

AAQ Reference Bit Zero, Change Bit Zero 

AAR Reference Bit Zero, Change Bit One 

AAS Reference Bit One, Change Bit Zero 

AAT Reference Bit One, Change Bit One 

AAU Segment Table Entry Invalid (1-Bit One) 

AAV Translation Available 
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RR Format 


Operation 


Name 


Mnemonic 


Remarks 


Code 








00 








01 








02 








03 








04 


Set Program Mask 


SPM 




05 


Branch and Link 


BALR 




06 


Branch on Count 


BCTR 




07 


Branch on Condition 


BCR 




08 


Set Storage Key- 


SSK 




09 


Insert Storage Key 


ISK 




0A 


Supervisor Call 


SVC 




0B 








OC 








0E 


Move Long 


MVCL 




OF 


Compare Logical Long 


CLCL 




10 


Load Positive 


LPR 




11 


Load Negative 


LNR 




12 


Load and Test 


LTR 




13 


Load Complement 


LCR 




14 


AND 


NR 




15 


Compare Logical 


CLR 




16 


OR 


OR 




17 


Exclusive OR 


XR 




18 


Load 


LR 




19 


Compare 


CR 




1A 


Add 


AR 




IB 


Subtract 


SR 




1C 


Multiply 


MR 




ID 


Divide 


DR 




IE 


Add Logical 


ALR 




IF 


Subtract Logical 


SLR 




20 


Load Positive (Long) 


LPDR 




21 


Load Negative (Long) 


LNDR 




22 


Load and Test (Long) 


LTDR 




23 


Load Complement (Long) 


LCDR 




24 


Halve (Long) 


HDR 




25 


Load Rounded (Extended to Long) 


LRDR 




26 


Multiply (Extended) 


MXR 




27 


Multiply (Long to Extended) 


MXDR 




28 


Load (Long) 


LDR 




29 


Compare (Long) 


CDR 




2A 


Add Normalized (Long) 


ADR 




2B 


Subtract Normalized 


SDR 




2C 


Multiply (Long) 


MDR 




2D 


Divide (Long) 


DDR 




2E 


Add Unnormalized (Long) 


AWR 




2F 


Subtract Unnormalized (Long) 


SWR 




30 


Load Positive (Short) 


LPER 




31 


Load Negative (Short) 


LNER 




32 


Load and Test (Short) 


LTER 




33 


Load Complement (Short) 


LCER 




34 


Halve (Short) 


HER 




35 


Load Rounded (Long or Short) 


LRER 




36 


Add Normalized (Extended) 


AXR 




37 


Subtract Normalized (Extended) 


SXR 




38 


Load (Short) 


LER 
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RR Format 


Operation 


Name 


Mnemonic 


Remarks 


Code 








39 


Compare (Short) 


CER 




3A 


Add Normalized (Short) 


AER 




3B 


Subtract Normalized (Short) 


SER 




3C 


Multiply (Short) 


MER 




3D 


Divide (Short) 


DER 




3E 


Add Unnormalized (Short) 


AUR 




3F 


Subtract Unnormalized (Short) 


SUR 




RX Format 


40 


Store Kalfword 


STH 




41 


Load Address 


LA 




42 


Store Character 


STC 




43 


Insert Character 


IC 




44 


Execute 


EX 




45 


Branch and Link 


BAL 




46 


Branch on Count 


BCT 




47 


Branch on Condition 


BC 




48 


Load Halfword 


LH 




49 


Compare Halfword 


CH 




4A 


Add Halfword 


AH 




4B 


Subtract Halfword 


SH 




4C 


Multiply Halfword 


MH 




4E 


Convert to Decimal 


CVD 




4F 


Convert to Binary 


CVB 




50 


Store 


ST 




51 








52 








53 








54 


AND 


N 




55 


Compare Logical 


CL 




56 


OR 







57 


Exclusive OR 


X 




58 


Load 


L 




59 


Compare 


C 




5A' 


Add 


A 




5B 


Subtract 


S 




5C 


Multiply 


M 




5D 


Divide 


D 




5E 


Add Logical 


AL 




5F 


Subtract Logical 


SL 




60 


Store (Long) 


STD 




61 








62 








63 








64 








65 








66 








67 


Multiply (Long to Extended) 


MXD 




68 


Load (Long) 


LD 




69 


Compare (Long) 


CD 




6A 


Add Normalized (Long) 


AD 




6B 


Subtract Normalized (Long) 


SD 




6C 


Multiply (Long) 


MD 




6D 


Divide (Long) 


DD 




6E 


Add Unnormalized (Long) 


AW 




6F 


Subtract Unnormalized (Long) 


SW 
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RX Format 


Operation 


Name 


Mnemonic 


Remarks 


Code 








70 


Store (Short) 


STE 




71 








72 








73 








74 








75 








76 








77 








78 


Load (Short) 


LE 




79 


Compare (Short) 


CE 




7A 


Add Normalized (Short) 


AE 




7B 


Subtract Normalized (Short) 


SE 




7C 


Multiply (Short) 


ME 




7D 


Divide (Short) 


DE 




7E 


Add Unnormalized (Short) 


AU 




7F 


Subtract Unnormalized (Short) 


SU 




RS,SI, and S 


Format 






80 


Set System Mask 


SSM 




81 








82 


Load PSW 


LPSW 




83 


Diagnose 






84 


Write Direct 


WRD 




85 


Read Direct 


RDD 




86 


Branch on Index High 


BXH 




87 


Branch on Index Low or Equal 


BXLE 




88 


Shift Right Single Logical 


SRL 




89 


Shift Left Single Logical 


SLL 




8A 


Shift Right Single 


SRA 




8B 


Shift Left Single 


SLA 




8C 


Shift Right Double Logical 


SRDL 




8D 


Shift Left Double Logical 


SLDL 




8E 


Shift Right Double 


SRDA 




8F 


Shift Left Double 


SLDA 




90 


Store Multiple 


STM 




91 


Test under Mask 


TM 




92 


Move (Immediate) 


MVI 




93 


Test and Set 


TS 




94 


AND (Immediate) 


NI 




95 


Compare Logical (Immediate) 


CLI 




96 


OR (Immediate) 


01 




97 


Exclusive OR (Immediate) 


XI 




98 


Load Multiple 


LM 




99 








9A 








9B 








9C 


Start I/O, Start I/O Fast Release 


SIO,SIOF 


See Note 2 


9D 


Test I/O 


TIO 




9E 


Halt I/O, Halt Device 


HI0,HDV 


See Note 1 


9F 


Test Channel 


TCH 




A0 








Al 








A2 








A3 








A4 








A5 








A6 
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RS/SI, and S Format 


Operation 


Name 


Mnemonic 


Remarks 


Code 








A7 








A8 








A9 








AA 








AB 








AC 


Store Then AND System Mask 


STNSM 




AD 


Store Then OR System Mask 


STOSM 




AE 








AF 


Monitor Call 


MC 




BO 








Bl 


Load Real Address 


LRA 




B2 


(First byte of two-byte operation code 


S) 




B3 








B4 








B5 








B6 


Store Control 


STCTL 




B7 


Load Control 


LCTL 




B8 








B9 








BA 








BB 








BC 








BD 


Compare Logical Characters under Mask 


CLM 




BE 


Store Characters under Mask 


STCM 




BF 


Insert Characters under Mask 


ICM 




SS Format 






CO 








CI 








C2 








C3 








C4 








C5 








C6 








C7 








C8 








C9 








CA 








CB 








CC 








CD 








CE 








CF 








DO 








Dl 


Move Numerics 


MVN 




D2 


Move (Characters) 


MVC 




D3 


Move Zones 


MVZ 




D4 


AND (Characters) 


NC 




D5 


Compare Logical (Characters) 


CLC 




D6 


OR (Characters) 


OC 




D7 


Exclusive OR (Characters) 


XC 




D8 








D9 








DA 








DB 








DC 


Translate 


TR 
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SS Format 


Operation 


Name 


Mnemonic 


Remarks 


Code 








DD 


Translate and Test 


TRT 




DE 


Edit 


ED 




DF 


Edit and Mark 


EDMK 




EO 








El 








E2 








E3 








E4 








E5 








E6 








E7 








W8 








E9 








EA 








EB 








EC 








ED 








EE 








EF 








FO 


Shift and Round Decimal 


SRP 




Fl 


Move with Offset 


MVO 




F2 


Pack 


PACK 




F3 


Unpack 


UNPK 




F4 








F5 








F6 








F7 








F8 


Zero and Add Decimal 


ZAP 




F9 


Compare Decimal 


CP 




FA 


Add Decimal 


AP 




FB 


Subtract Decimal 


SP 




FC 


Multiply Decimal 


MP 




FD 


Divide Decimal 


DP 




FE 








FF 









NOTES 

1. Under the System/370 architecture, the machine operations for Halt Device and Halt 
I/O are as follows: 



1001 1110 XXXX XXXO 



1001 1110 XXXX XXXI 



Halt I/O 
Halt Device 



HIO 
HDV 



(X denotes an ignored bit position) 



130.4 



2. Under the System/370 architecture, the machine operations for Start I/O and Start 
I/O Fast Release are as follows: 

1001 1100 XXXX XXXO Start I/O SIO 

1001 1100 XXXX XXX1 Start I/O Fast Release SIOF 

(X denotes an ignored bit position) 



Operation 






Code 


Name 


Mnemonic 


B202 


Store CPU ID 


STIDP 


B203 


Store Channel ID 


ST IDC 


B204 


Set Clock 


SCK 


B205 


Store Clock 


STCK 


B206 


Set Clock Comparator 


SCKC 


B207 


Store Clock Comparator 


STCKC 


B208 


Set CPU Timer 


SPT 


B209 


Store CPU Timer 


STPT 


B20D 


Purge Translation 






Lookaside Buffer 


PTLB 


B213 


Reset Reference Bit 


RRB 
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APPENDIX E: ASSEMBLER INSTRUCTIONS 



r t 

Operation 



Name Entry 



Operand Entry 



ACTR 
AGO 



Must not be present 



A sequence symbol or not present 



An arithmetic SETA expression 
A sequence symbol 



AIF 



A sequence symbol or not present 



ANOP 



A sequence symbol 



A logical expression enclosed in parenthe- 
ses, immediately followed by a sequence 
symbol 

Will be taken as a remark 
1 

Four operands, separated by commas 



ccw 



Any symbol or not present 



CNOP 



A sequence symbol or not present 



Two absolute expressions, separated by a 
comma 
^ 

Will be taken as a remark 
A symbol 



COM 
COPY 



A sequence symbol or not present 



h 
|( 

h 

CXD * 

I 

DC 

h 



Must not be present 



-H 



CSECT 



Any symbol or not present 



Will be taken as a remark 



Any symbol or not present 



Will be taken as a remark 



Any symbol or not present 



One or more operands, separated by commas 



DROP 



A sequence symbol or not present 



One to sixteen absolute expressions, sepa- 
rated by commas 



DS 



Any symbol or not present 



One or more operands, separated by commas 



DSECT 



A variable symbol or an 
ordinary symbol 



Will be taken as a remark 



DXD 



A symbol 



One or more operands, separated by commas 



EJECT 



A sequence symbol or not present 



Will be taken as a remark 



END I A sequence symbol 
or not present 

ENTRY | A sequence symbol or not 



A relocatable expression 
or not present 



present 



One or more relocatable symbols, separated 
by commas 



EQU 



A variable symbol or an 
ordinary symbol 



An absolute or relocatable expression 



EXTRN 



A sequence symbol or not present 



One or more relocatable symbols, separated 
by commas 



GBLA 



Must not be present 



One or more variable symbols that are to be 
used as SET symbols, separated by commas 2 



GBLB 



Must not be present 



I 

GBLC 



One or more variable symbols that are to be 
used as SET symbols, separated by commas 2 



Must not be present 



-+- 



One or more variable symbols that are to be 
used as SET symbols, separated by commas 2 



ICTL 



Must not be present 



One to three decimal values, separated by 
commas 



* Assembler F only 
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i Operation • • J 
1 Entry ' Name Entry ' Operand Entry ' 


• ISEQ ! Must not be present , Two decimal values, separated by a comma | 


LCLA Must not be present One or more variable symbols that are to , 
! , be used as SET symbols, separated by , 
j_ !_•'■■ j commas 2 ! 


! LCLB Must not be present . One or more variable symbols that are to , 
l . , be used as SET symbols, separated by ( 
I , i commas 2 i 


, LCLC Must not be present , One or more variable symbols separated , 
i ,_ jl by commas 2 I 

J_LTORG !_ Any symbol or not present '_[ Will be taken as a remark j 


1 MACRO 1 ' Must not be present ' Will be taken as a remark ' 


i MEND 1 I A sequence symbol or not present i Will be taken as a remark i 


i "- 1 ~ t ~ ~ ~ — • 

, MEXIT 1 L A sequence symbol or not present i Will be taken as a remark I 

1 MN0TE1 { A sequence symbol, a variable , A severity code, followed by a comma, ( 
, , symbol or not present I followed by any combination of characters j 
i i i enclosed in apostrophes i 


1 — _ — _ __j — — _ j 

, OPSYN* An ordinary symbol i A machine instruction mnemonic code , an , 
i | i extended mnemonic code, or an operation i 
i i 1 code defined by a previous OPSYN instruc-i 
« i l tion I 


l ~ --- - — - -j - — - — - -j 

i l A machine or extended mnemonic i Blank i 
i i operation code i i 


1 ORG | A sequence symbol or not present i A relocatable expression or not present i 


I PRINT A sequence symbol or not present | One to three operands , 


1 PUNCH ' A sequence symbol or not present ' One to eighty characters enclosed in ' 
J ' apostrophes ( 


1 REPRO ' A sequence symbol or not present ' Will be taken as a remark ' 


i SETA i A SETA symbol i An arithmetic expression 1 


, SETB | A SETB symbol I A or a 1 , or logical expression i 
i i i enclosed in parentheses i 


, SETC , A SETC symbol , A type attribute, a character expression,, 
i j 1 a substring notation, or a concatenation i 
it i of character expressions and substring l 
• l i notations • 


I SPACE i A sequence symbol or not present i A decimal self-defining term or not i 
i i I present ' 


i ■t "* t ,~ — - ~i 

i START i Any symbol or not present i A self-defining term or not present i 


I TITLED - A special symbol (0 to 4 char- | One to 100 characters, enclosed in , 
I l acters) , a sequence symbol, a | apostrophes I 
I i variable symbol, or not I i 
1 i present ' ' 


I USING i A sequence symbol or not present i An absolute or relocatable expression i 

1 1 I followed by 1 to 16 absolute expres- i 

• i ' sions, separated by commas ' 
| __L_ _ _ _ _ _ . l _ -J 


i WXTRN J A sequence symbol or not present ' One or more relocatable symbols, sepa- J 
| | | rated by commas { 


' 1 ' 
i May only be used as part of a macro-definition. • 

1 2 • 
1 SET symbols may be defined as subscripted SET symbols. I 
l 3 I 
i See Section 5 for the description of the name entry. , 

i * i 
Assembler F only. 
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ASSEMBLER STATEMENTS 



INSTRUCTION 



NAME ENTRY 



OPERAND ENTRY 



J. X + -I 



Model Statements 3 ** |An ordinary symbol, variable |Any combination of char- 

| symbol, sequence variable jacters (including variable 
j symbol, a comoination of (symbols) 
| variable symbols and other | 
| characters that is equivalent! 
|to a symbol, or not present j 

_ _ _ j _ _ i_ «. _ _ 


1 — T . 

Prototype Statement 1 |A symbolic parameter or |Zero or more operands that 

(not present jare symbolic parameters, sep- 
| jarated by commas, followed by 
j |zero or more operands 
j | (separated by commas) of the 
j j f orm symbolic parameter, 
j j equal sign, optional standard 
| lvalue 

X _ L__ _ _ _ 


T T ■ . - 

Macro-Instruction |An ordinary symbol, a j Zero or more positional 
Statement 1 | variable symbol, a sequence j operands separated by commas, 

| symbol, a combination of j followed by zero or more 
| variable symbols and other j key word operands (separated 
(characters that is equivalent j by commas) of the form 
j to a symbol, 2 or not present (keyword, equal sign, value 2 
+ x „ 

Assembler Language |An ordinary symbol, a var- I Any combination of characters 
Statement 3 ** liable symbol, a sequence ((including variable symbols) 

j symbol, a combination j 

j of variable symbols and j 

| other characters that is j 

(equivalent to a symbol, | 

|or not present j 



L X X J 

1 May only be used as part of a macro definition. 

2 Variable symbols appearing in a macro instruction are replaced by their values 
before the macro instruction is processed. - ■ 

3 Variable symbols may be used to generate assembler language mnemonic operation 
codes as listed in Section 5, except ACTR, COPY, END, ICTL, CSECT, DSECT, ISEQ, 
PRINT, REPRO, and START. Variable symbols may not be used in the ^ame and 
operand entries of the following instructions: COPY, END, ICTL, a*.d ISEQ. 
Variable symbols may not be used in the name entry of the ACTR instruction. 

u No substitution for variables in the line following a REPRO statement is 
performed. 

s When the name field of a macro instruction contains a sequence symbol, 
the sequence symbol is not passed as a name field parameter. It only 
has meaning as a possible branch target for conditional assembly. 
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APPENDIX F: SUMMARY OP CONSTANTS 



TYPE 



IMPLIED 

LENGTH 

(BYTES) 



as 
needed 



as 
needed 



as 
needed 



ALIGN- 
MENT 



byte 



byte 
byte 



LENGTH 
MODI- 
FIER 
RANGE 



.1 to 
256 (1) 



.1 to 
256 (1) 



.1 to 
256 



SPECIFIED 
BY 



characters 



hexadecimal 
digits 



binary 
digits 



NUMBER 
OF CON- 
STANTS 

PER 
OPERAND 



one 






one 



one 



RANGE 
FOR EX- 
PONENTS 



— + 



RANGE 

FOR 
SCALE 



right 
left 



TRUN- 
CATION/ 
PADDING 

SIDE 



left 



word 



1 to 



decimal 
digits 



multi- 
ple 



-85 to 
+75 



-187 to 
+ 346 



left (4) 



half 
word 



1 to 



8 



decimal 
digits 



multi- 
ple 



-85 to 
+75 



-187 
+346 



left (4) 



word 



.1 to 

8 



decimal 
digits 



multi- 
ple 



-85 to 
+75 



right (4) 



0-14 



double 
word 



1 to 



decimal 
digits 



multi- 
ple 



-85 to 
+75 



0-14 



right (4) 



L (3) 
P 



16 



double 
word 



.1 to 
16 



decimal 
digits 






as 
needed 



byte 



1 to 
16 



decimal 
digits 



multi- 
ple 

multi- 
ple 



-85 to 
+75 



0-28 






right (4) 

4 _j 

left 



-H 



as 
needed 



byte 



.1 to 
16 



decimal 
digits 



multi- 
ple 



left 



word 



.1 to 
4 (2) 



any 
expression 



multi- 
ple 



left 



Q(3) 



word 



1-4 



symbol nam- 
ing a DXD 
or DSECT 



multi- 
ple 



-+ 



left 



word 



3 or 
4 



half 
word 



relocatable 
symbol 
+ 



multi- 
ple 



+ 



left 






half 
word 



2 only | one absolute 
or relocatab- 
le expression 
or two absol- 
ute express- 
ions: 
exp (exp) 

.1 to j any 

2 (2) | expression 



multi- 
ple 



multi- | j | left 
pie 



(1) In a DS assembler instruction C and X type constants may have length specification 
to 65535. 

(2) Bit length specification permitted with absolute expressions only. Relocatable A- 
type constants, 3 or 4 bytes only; relocatable Y-type constants, 2 bytes only. 

(3) Assembler F only. 

(4) Errors will be flagged if significant bits are truncated or if the value specified 
j cannot be contained in the implied length of the constant. j 
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APPENDIX G: MACRO LANGUAGE SUMMARY 



The four charts in this appendix summarize the macro language described in Part II of 
this publication. 

Chart 1 indicates which macro language elements may be used in the name and operand 
entries of each statement. 

Chart 2 is a summary of the expressions that may be used in macro-instruction 
statements . 

Chart 3 is a summary of the attributes that may be used in each expression. 

Chart 4 is a summary of the variable symbols that may be used in each expression. 



Statement 


Variable Symbols 


Attributes 


Sequence 
Symbol 


Global SET Symbols 


Local SET Symbols 


System Variable Symbols 


Symbolic 
Parameter 


SETA 


SETB 


SETC 


SETA 


SETB 


SETC 


4SYSNDX 


4SYSECT 


4SYSUST 


Type 


Length 


Scaling 


Integer 


Count 


Number 


MACRO 




































Prototype 
Statement 


Name 
Operand 


































GBLA 




Operand 
































GBLB 






Operand 






























GBLC 








Operand 




























LCLA 










Operand 


























LCLB 












Operand 
























LCLC 














Operand 






















Model 
Statement 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Nome 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 














Name 


SETA 


Operand 2 


Name 
Operand 


Operand 3 


Operand 


Name 
Operand 


Operand 3 


Operand 


Operand 




Operand^ 




Operand 


Operand 


Operand 


Operand 


Operand 




SETB 


Operand 


Operand 


Name 
Operand 


Operand 6 


Operand^ 


Name 
Operand 


Operand^ 


Operand^ 


Operand 


Operand 


Operand* 


Operand 5 


Operand 5 


Operand 5 


Operand 5 


Operand 




SETC 


Operand 


Operand' 


Operand 8 


Name 
Operand 


Operand 


Operand 8 


Name 
Operand 


Operand 


Operand 


Operand 


Operand 














AIF 


Operand 6 


Operand 6 


Operand 


Operand 6 


Operand 6 


Operand 


Operand 6 


Operand 


Operand* 


Operand 6 


Operand* 


Operand 5 


Operand 3 


Operand 5 


Operand 


Operand 3 


Name 
Operand 


AGO 


































Name 
Operand 


ACTR 


Operand 2 


Operand 


Operand 3 


Operand 2 


Operand 


Operand 3 


Operand 2 


Operand 




Operand 2 




Operand 


Operand 


Operand 


Operand 


Operand 




ANOP 


































Name 


MEXIT 


































Name 


MNOTE 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 


Operand 














Name 


MEND 


































Name 


Outer 
Macro 




Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 




















Name 


Inner 
Macro 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Nome 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 














Name 


Assembler 
Language 
Statement 




Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 




















Name 


1 . Variable symbols in macro-instructions ore replaced by their values before processing . 

2. Only if value is self-defining term. 

3. Converted to arithmetic +1 or -K). 

4. Only in character relations . 

5. Only in arithmetic relations. 

6. Only in arithmetic or character relations. 

7. Converted to unsigned number . 

8 . Converted to character 1 or . 

9. Only if one to eight decimal digits. 

.._ 



Chart 1. Macro Language Elements 
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Chart 2. Conditional Assembly Expressions 



T T 

| Arithmetic Expressions 
+ 

1. Self-defining terms 
Length, scaling, 
integer, count, and 
number attributes 
SETA and SETB symbols 
SETC symbols whose 
value is 1-8 decimal 
digits 

Symbolic parameters 
if the corresponding 
operand is a self- 
defining term 
6SYSLIST(n) if the 
corresponding operand 
is a self-defining 
term 

SSYSLIST(n,m) if the 
corresponding operand 
is a self-defining 
term 

8. SSYSNDX 



. T 1 

| Logical Expressions} 



j Expression 
t 

May 
contain 



j Character Expressions 



2. 



3. 



5. 



6. 



7. 



1. Any combination of 
characters enclosed 
in apostrophes 

2. Any variable symbol 
enclosed in apostrophes 

3. A concatenation of 
variable symbols and 
other characters 
enclosed in apostrophes 

4. A request for a type 
attribute 



1. SETB symbols 

2. Arithmetic re- 
lations 1 

3. Character re- 
lations 2 



Operators 
are 



+,-,*, and / 
parentheses permitted 



concatenation, with a 
period ( . ) 



AND, OR, and NOT 
parentheses per- 
mitted 



Range 

of values 



-2 31 to +2 31 -1 



through 255 characters 



(false) or 

1 (true) 



May be 
used in 



1. SETA operands 

2. Arithmetic relations 

3. Subscripted SET 
symbols 

a. SSYSLIST 

5. Substring notation 

6. Sub list notation 



1. SETC operands 3 

2. Character relations 2 



1. SETB operands 

2. AIP operands 



An arithmetic relation consists of two arithmetic expressions related by the 

operators GT, LT, EQ, NE, GE, or LE. 

A character relation consists of two character expressions related by the operator 

GT, LT, EQ, NE, GE, or LE. The type attribute notation and the substring notation 

may also be used in character relations. The maximum size of the character 

expressions that can be compared is 255 characters. If the two character 

expressions are of unequal size, then the smaller one will always compare less than 

the larger. 

Maximum of eight characters will be assigned. 
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Chart 3. 
r 



Attributes 



t 1 

May be used in 



Attribute 



Notation 



May be used with: 



May be used only if 
type attribute is: 



Type 



Symbols outside 
macro definitions; 
symbolic parameters, 
6SYSLIST(n), and 
6SYSLIST(n, m) inside 
macro definitions 



(May always be used) 



1. SETC operand 
fields 

2. Character 
relations 



Length 



Symbols outside 
macro definitions; 
symbolic parameters, 
SSYSLIST(n), and 
SSYSLIST(n,m) inside 
macro definitions 



Any letter except 
M,N,0,T, and U 



Arithmetic 
expressions 



+ 

Arithmetic 
expressions 



Scaling 



Integer 



S' 



Symbols outside 
macro definitions; 
symbolic parameters, 
SSYSLIST(n) , and 
£SYSLIST(n,m) inside 
macro definitions 



H,F,G,D,E,L,K,P, 
and Z 



Symbols outside 
macro- definitions ; 
symbolic parameters, 
fiSYSLIST(n), and 
£SYSLIST(n,m) inside 
macro definitions 



H,F,G,D,E,L,K,P, 
and Z 



Arithmetic 
expressions 



Count 



Symbolic parameters 
corresponding to 
macro instruction 
operands, 6SYSLIST 
(n), and 6SYSLIST(n,m) 
inside macro 
definitions 



Any letter 



Arithmetic 
expressions 



Number 



Symbolic parameters, 
6SYSLIST, and 
6SYSLIST(n) inside 
macro definitions 



Any letter 



Arithmetic 
expressions 



♦NOTE: There are definite restrictions in the use of these attributes. Refer to text, 
Section 9. 
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Chart 4. 



Variable Symbols 

t 

Defined by: 



Variable 
symbol 



Initialized, 
or set to: 



Value changed 
by: 



May be used in: 



Symbolic 1 
parameter 



Prototype 
statement 



Corresponding 
macro instruction 
operand 



(Constant 

throughout 

definition) 



1. Arithmetic expressions 
if operand is self- 
defining term 

2. Character expressions 



SETA 



LCLA or GBLA 
instruction 



SETA 
instruction 



1. Arithmetic expressions 

2. Character expressions 



SETB 



LCLB or GBLB 
instruction 



SETB 
instruction 



1. Arithmetic expressions 

2. Character expressions 

3. Logical expressions 



SETC 



LCLC or GBLC 
instruction 



Null character 
value 



SETC 
instruction 



1. Arithmetic expressions 
if value is self- 
defining term 

2. Character expressions 



&SYSNDX 1 - 



The assembler 



Macro instruction 
index 



(Constant 
throughout 
definition; 
unique for 
each macro- 
instruction) 



1. Arithmetic expressions 

2. Character expressions 



&SYSECT 1 



&SYSLIST 1 



The assembler 



Control section 
in which macro 
instruction 
appears 



(Constant 
throughout 
definition; 
set by CSECT, 
DSECT, and 
START) 



Character expressions 



The assembler 



Not applicable 



Not applicable 



■+• 



N'6SYSLIST in arithmetic 
expressions 



-+ 



gSYSLIST(n) 1 - 
SSYSLIST(n,m) 



The assembler 



Corresponding 
macro instruction 
operand 



(Constant 

throughout 

definition) 



1. Arithmetic expressions 
if operand is self- 
defining term 

2. Character expressions 



._+__. + 

be used in macro definitions. 



H 



| x May only 

L 
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APPENDIX H: SAMPLE PROGRAM 



Given: 

1. A TABLE with 15 entries, each 16 bytes long, having the following format: 

r t t t r — 1 

I NUMBER of items | SWITCHes j ADDRESS j NAME | 

L X ,-L J. J 

3 bytes 1 byte 4 bytes 8 bytes 

2. A LIST of items, each 16 bytes long, having the following format: 

r T T T T 

j NAME j SWITCHes | NUMBER of items j ADDRESS j 

L X J. JL J 

8 bytes 1 byte 3 bytes 4 bytes 

Find: Any of the items in the LIST which occur in the TABLE and put the SWITCHes, 
NUMBER of items, and ADDRESS from that LIST entry into the corresponding TABLE 
entry. If the LIST item does not occur in the TABLE, turn on the first bit in 
the SWITCHes byte of the LIST entry. 

The TABLE entries have been sorted by their NAME. 



.* 
.* 

tTYPE 
.MOVE 



.* 
.* 



TITLE 

PRINT DATA 

THIS IS THE MACRO DEFINITION 

MACRO 

MOVE 6T0.6FR0M 

DEFINE SETC SYMBOL 

LCLC GTYPE 

CHECK NUMBER OF OPERANDS 

AIF (N'tSYSLIST NE 2).ERR0R1 

CHECK TYPE ATTRIBUTES OF OPERANDS 

AIF (T'&TO NE T«£FR0M).ERR0R2 

AIF (T«£TO EQ «C OR T'6T0 EQ '6' OR T • &T0 EQ 'K'J.TYPECGK 

AIF <T'£TO EQ 'D* OR T«£T0 EQ 'E* OR T'ETO EQ «H').TYPEDEH 

AIF (T'&TO EQ «F«).M0VE 

AGO .ERR0R3 

ANOP 

ASSIGN TYPE ATTRIBUTE TO SETC SYMBOL 

SETC T«£TO 

ANOP 

NEXT TtaO STATEMENTS GENERATED FOR MOVE MACRO 

LtTYPE 2 f £FR0M 

ST6TYPE 2,£T0 

MEXIT 

CHECK LENGTH ATTRIBUTES OF OPERANDS 

AIF (L'&TG NE L«£FROM OR L'tTO GT 2561.ERR0R4 
NEXT STATEMENT GENERATED FOR MOVE MACRO 
MVC 6T0,6FR0M 
MEXIT 

ERROR MESSAGES FOR INVALID MOVE MACRO INSTRUCTIONS 



SAMPL001 
SAMPL002 
SAMPL003 
SAMPL004 
SAMPL005 
SAMPL006 
SAMPL007 
SAMPL008 
SAMPL009 
SAMPL010 
SAMPLOll 
SAMPL012 
SAMPL013 
SAMPL014 
SAMPL015 
SAMPL016 
SAMPL017 
SAMPL018 
SAMPL019 
SAMPL020 
SAMPL021 
SAMPL022 
SAMPL023 
SAMPL024 
SAMPL025 
SAMPL026 
SAMPL027 
SAMPL028 
SAMPL029 
SAMPL030 
SAMPL031 
SAMPL032 
SAMPL033 
SAMPL034 
SAMPL035 
SAMPL036 
SAMPL037 
SAMPL038 
SAMPL039 
SAMPL040 
SAMPL041 
SAMPL042 
SAMPL043 
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.ERR0R1 
.ERROR2 
.ERROR3 
.ERR0R4 



SAMPLR 
BEGIN 



MNOTE 1.' IMPROPER NUMBER OF OPERANDS, NO STATEMENTS GENERATED* 

MEXIT 

MNOTE 1, 'OPERAND TYPES DIFFERENT, NO STATEMENTS GENERATED* 

MEXIT 

MNOTE 1, 'IMPROPER OPERAND TYPES, NO STATEMENTS GENERATED' 

MEXIT 

MNOTE 1,'IMPROPER OPERAND LENGTHS, NO STATEMENTS GENERATED' 

MEND 

MAIN ROUTINE 



CSECT 

SAVE 

BALR 

USING 

ST 

LM 



(14,12),,* 

R12.0 

*,R12 

13.SAVE13 

R5,R7,*A(LISTAREA,16,LISTEN01 



ESTABLISH ADDRESSABILITY OF PROGRAM 
AND TELL THE ASSEMBLER WHAT BASE TO USE 



LOAD LIST AREA PARAMETERS 



USING LIST,R5 
MORE 8AL R14, SEARCH 

TM SWITCH, NONE 

BO NOTTHERE 

USING TABLE, Rl 

MOVE 

MOVE 

MOVE 
LISTLOOP 6XLE 

CLC 

BNE 

CLC 

BNE 

WTO 
EXIT L 

RETURN U4,12I,RC=0 



REGISTER 5 POINTS TO THE LIST 
FIND LIST ENTRY IN TABLE 
CHECK TO SEE IF NAME WAS FOUND 
BRANCH IF NOT 
REGISTER 1 NOW POINTS TO TABLE ENTRY 

TSWITCH.LSWITCH MOVE FUNCTIONS 

TNOMBfcR.LNUMBER FROM LIST ENTRY 

TADDRESS.LADDRESS TO TABLE ENTRY 

K5,R6,M0RE LOOP THROUGH THE LIST 

TESTTABLt240),TABLAREA 

NOTRIGHT 

TESTLISH96I .LISTAREA 

NOTRIGHT 

•ASSEMBLER SAMPLE PROGRAM SUCCESSFUL' 

R13.SAVE13 



NOTTHERE 

SAVE13 
SWITCH 
NONE 



SEARCH 



WTO 'ASSEMBLER SAMPLE PROGRAM UNSUCCESSFUL' 

B EXIT 

01 LSWITCH.NONE TURN ON SWITCH IN LIST ENTRY 

B LISTLOOP GO BACK AND LOOP 

DC F • • 

DC X'OO' 

EQU X'80' 

BINARY SEARCH ROUTINE 



LOOP 



HIGHER 
NOTFOUND 



NI 

LM 

LA 

SRL 

CLC 

BH 

BCR 

SR 

BCT 

B 

AR 

BCT 

01 

BR 



DS 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 



SWITCH, 255-NONE TURN OFF NOT FOUND SWITCH 



R1,R3,=F'128,4,128' 

R1,TABLAREA-16<R1) 

R3.1 

LNAME.TNAME 

HIGHER 

6,R14 

R1.R3 

R2.L00P 

NOTFOUND 

R1.R3 

R2.L0CP 

SWITCH, NONE 

R14 



LOAD TABLE PARAMETERS 

GET ADDRESS OF MIDDLE ENTRY 

DIVIDE INCREMENT BY 2 

COMPARE LIST ENTRY WITH TABLE ENTRY 

BRANCH IF SHOULD BE HIGHER IN TABLE 

EXIT IF FOUND 

OTHERWISE IT IS LOWER IN THE TABLE 

SO SUBTRACT INCREMENT 
LOOP 4 TIMES 

ARGUMENT IS NOT IN THE TABLE 
ADD INCREMENT 
LOOP 4 TIMES 

TURN ON NOT FOUND SWITCH 
EXIT 



THIS IS THE TABLE 



OD 

XL8'0 

XL8'0 

XL6'0 

XL8'0 

XL8'0 

XLS'O 

XL8'0 

XL8'0 

XL6'0 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XLS'O 



,CL8' 
,CL8' 
,CL8' 
,CL8« 
,CL8' 
,CL8' 
,CL8« 
,CL8' 
,CL8' 
,CL8' 
,CL8' 
,CL8' 
,CL8' 
,CL8' 
,CL8» 



ALPHA' 

BETA' 

DELTA' 

EPSILON' 

ETA' 

GAMMA' 

ICTA' 

KAPPA* 

LAMBDA' 

MU' 

NU' 

OMICRON' 

PHI' 

SIGMA' 

ZETA' 



SAMPL044 
SAMPL045 
SAMPL046 
SAMPL047 
SAMPL048 
SAMPL049 
SAMPL050 
SAMPL051 
SAMPL052 
SAMPL053 
SAMPL054 
SAMPL055 
SAMPL056 
SAMPL057 
SAMPL058 
SAMPL059 
SAMPL060 
SAMPL061 
SAMPL062 
SAMPL063 
SAMPL064 
SAMPL065 
SAMPL066 
SAMPL067 
SAMPL068 
SAMPL069 
SAMPL070 
SAMPL071 
SAMPL072 
SAMPL073 
SAMPL074 
SAMPL075 
SAMPL076 
SAMPL077 
SAMPL078 
SAMPL079 
SAMPL080 
SAMPL081 
SAMPL082 
SAMPL083 
SAMPL084 
SAMPL085 
SAMPL086 
SAMPL087 
SAMPL088 
SAMPL089 
SAMPL090 
SAMPL091 
SAMPL092 
SAMPL093 
SAMPL094 
XSAMPL095 
SAMPL096 
SAMPL097 
SAMPL098 
SAMPL099 
SAMPL100 
SAMPL101 
SAMPL102 
SAMPL103 
SAMPL104 
SAMPL105 
SAMPL106 
SAMPL107 
SAMPL108 
SAMPL109 
SAMPL110 
SAMPL111 
SAMPL112 
SAMPL113 
SAMPL114 
SAMPL115 
SAMPL116 
SAMPL117 
SAMPLU8 
SAMPL119 
SAMPL120 
SAMPU21 
SAMKI22 
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LISTEND 



THIS IS THE LIST 

DC CL8 • LAMBDA ',X'0A',FL3« 29', A( BEGIN) 

DC CL8'ZETA',X'05',FL3'5',A<L00P> 

DC CL8'THETA',X'02',FL3'45',A( BEGIN) 

DC CL8'TAU',X'00',FL3'0',A<1) 

DC CL8'LIST«,X'1F',FL3'465« ,A(0) 

DC CL8'ALPHA',X'00',FL3«1',A(123) 

THIS IS THE CONTROL TABLE 



DS 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 



OD 

FL3'1 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XLS'O 



XL8'0 
XL8'0 
XL8'0 
XL8'0 
XL8'0 
FL3'5 



,X'00',A(123),CL8'ALPHA' 

,CL8'BETA' 

,CL8'DELTA' 

,CL8'EPSILON« 

,CL8'ETA' 

,CL8'GAMMA' 

,CL8'ICTA' 

,CL8'KAPPA« 



FL3' 29 SX'OA'tAC BEGIN) ,CL8' LAMBDA' 



,CL8'MU' 

,CL8'NU' 

,CL8'GMICR0N' 

,CL8'PHI' 

,CL8'SIGMA' 

,X'05',A<LOOP},CL8'ZETA' 



THIS IS THE CONTROL LIST 

DC CL8' LAMBDA' ,X'OA« ,FLJ' 29« , A( BEGIN) 

DC CL8'ZETA',X'05',FL3'5',A(LOOP) 

DC CL8'THETA',X'82',FL3'45' ,A( BEGIN) 

DC CL8'TAU',X'80',FL3'0',A(1) 

DC CL8 , LlST,X. , 9F t ,fL3"t65' ,A(0) 

DC CL8' ALPHA', X' 00', FL3'1 • , A( 123) 

THESE ARE THE SYMBOLIC REGISTERS 



RO 

Rl 

R2 

R3 

R5 

R6 

R7 

R12 

R13 

R14 

R15 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 





1 

2 

3 

5 

6 

7 

12 

13 

14 

15 



LIST 

LNAME 
LSWITCH 
LNUMBfcR 
LADDRESS 



TABLE 

TNUMBER 
TSWITCH 
TADDRESS 
TNAME 



THIS IS THE FORMAT DEFINITION OF LIST ENTRYS 

DSECT 
DS CL8 
DS C 
DS FL3 
DS F 

THIS IS THE FORMAT DEFINITION OF TABLE ENTRYS 

DSECT 
DS FL3 
DS C 
DS F 
DS CL8 
ENO BEGIN 



SAMPi.123 
SAMPL124 
SAMPL125 
SAMPL126 
SAMPL137 
SAMPL128 
SAMPL129 
SAMPL130 
SAMPL131 
SAMPL132 
SAMPL133 
SAMPL134 
SAMPL135 
SAMPL136 
SAMPL137 
SAMPL138 
SAMPL139 
SAMPL140 
SAMPL141 
SAMPL142 
SAMPL143 
SAMPL144 
SAMPL145 
SAMPL146 
SAMPL147 
SAMPL148 
SAMPL149 
SAMPL150 
SAMPL151 
SAMPL152 
SAMPL153 
SAMPL154 
SAMPL155 
SAMPL156 
SAMPL157 
SAMPL158 
SAMPL159 
SAMPL160 
SAMPL161 
SAMPL162 
SAMPL163 
SAMPL164 
SAMPL165 
SAMPL166 
SAMPL167 
SAMPL168 
SAMPL169 
SAMPL170 
SAMPL171 
SAMPL172 
SAMPL173 
SAMPL174 
SAMPL175 
SAMPL176 
SAMPL177 
SAMPL178 
SAMPL179 
SAMPL180 
SAMPL181 
SAMPL182 
SAMPL183 
SAMPL184 
SAMPL185 
SAMPL186 
SAMPL187 
SAMPL188 
SAMPL189 
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APPENDIX I: ASSEMBLER LANGUAGES — FEATURES COMPARISON CHART 



Features not shown below are common to all assemblers. In the chart: 
Dash = Not allowed. 
X = As defined in Operating System/360 Assembler Language Manual. 



Feature 


Basic 

Programming 

Support/360: 

Basic 

Assembler 


7090/7094 
Support 
Package 
Assembler 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


DOS/TOS 
Assembler 


OS/360 
Assembler 


No. of Continuation Cards/Statement 
(exclusive of macro-instructions) 








1 


1 


2 


Input Character Code 


EBCDIC 


BCD & EBCDIC 


EBCDIC 


EBCDIC 


EBCDIC 


ELEMENTS: 












Maximum Characters per symbol 


6 


6 


8 


8 


8 


Character self-defining terms 


1 Char, only 


X 


X 


X 


X 


Binary self-defining terms 






X 


X 


X 


Length attribute reference 






X 


X 


X 


Literals 






X 


X 


X 


Extended mnemonics 




X 


X 


X 


X 


Maximum Location Counter value 


2> 6 -l 


224., 


2 2 4-1 


2 24 -l 


2 24 -1 


Multiple Control Sections per assembly 






X 


X 


X 


EXPRESSIONS: 












Operators 


+ -* 


+ -*/ 


+ -*/ 


+ -V 


+ -*/ 


Number of terms 


3 


16 


3 


16 


16 


Levels of parentheses 






1 


5 


5 


Complex relocatability 






X 


X 


X 


ASSEMBLER INSTRUCTIONS: 












DC and DS 












Expressions allowed as modifiers 








X 


X 


Multiple operands 








X 2 


X 


Multiple constants in an operand 


- - 


- - 


Except 
Address 
Consts. 


X 


X 


Bit length specifications 








X 2 


X 


Scale modifier 






X 


X 


X 


Exponent Modifier 






X 


X 


X 


DC types 


Except 
B, P, Z 
V, Y, S, L 


Except 
B, V, L 


Except L 


X 2 


X 


DC duplication factor 


Except A 


X 


Except S 


X 


X 



Assembler F only 



2 DOS 14K D Assembler only 
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Feature 


Basic 

Programming 

Support/360: 

Basic 

Assembler 


7090/7094 
Support 
Package 
Assembler 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


DOS/TOS 
Assembler 


OS/360 
Assembler 


DC duplication factor of zero 






Except S 


X 


X 


DC length modifier 


Except 
H, E, D 


X 


X 


X 


X 


DS types 


Only C, 
H, F, D 


Only C, 
H, F, D 


Except L 


X 2 


X 


DS length modifer 


Only C 


Only C 


X 


X 


X 


DS maximum length modifier 


256 


256 


256 


65,535 


65,535 


DS constant subfield permitted 






X 


X 


X 


COPY 








X 


X 


CSECT 






X 


X 


X 


DSECT 


~ 




X 


X 


X 


ISEQ 






X 


X 


X 


LTORG 






X 


X 


X 


PRINT 






X 


X 


X 


TITLE 




X 


X 


X 


X 


COM 








X 


X 


ICTL 


1 operand 
(1 or 25 
only) 


1 operand 


X 


X 


X 


USING 


2 operands 
(operand 1 
relocatable 
only) 


2-17 operands 
(operand 1 
relocatable 
only) 


6 operands 


X 


X 


DROP 


1 operand 
only 


X 


5 operands 


X 


X 


CCW 


operand 2 

(relocatable 

only) 


X 


X 


X 


X 


ORG 


no blank 
operand 


no blank 
operand 


X 


X 


X 


ENTRY 


1 operand 
only 


1 operand 
only 


1 operand 
only 


X 


X 


EXTRN 


I operand 
only (max 14) 


1 operand 
only 


1 operand 
only 


X 


X 


WXTRN 


-- 




-- 


X 2 


X 1 


CNOP 


2 decimal 
digits 


2 decimal 
digits 


2 decimal 
digits 


X 


X 


PUNCH 


-- 


-- 


-- 


X 


X 


REPRO 


-- 


-- 


X 


X 


X 


Macro Instructions 


-- 


-- 


X 


X 


X 


OPSYN 


-- 


-- 


-- 


-- 


X 1 


EQU 


X 


X 


X 


X 


X 



'Assembler F only 

2 DOS Assembler 14KD only 
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Macro Facility Features 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


BOS 16K 

Disk/Tape 

Assembler 


OS/360 
Assembler 


Operand Sublisrs 




X 


X 


Attributes of macro-instruction operands inside macro definitions and symbols used in 


- - 


X 


X 


conditional assembly instructions outside macro definitions. 








Subscripted SET symbols 




X 


X 


Maximum number of operands 


49 


100 1 


200 


Conditional assembly instructions outside macro definitions 




X 


X 


Maximum number of SET symbols 








global SETA 


16 


* 


* 


global SETB 


1.28 


* 


* 


global SETC 


16 


* 


* 


local SETA 


16 


* 


* 


local SETB 


128 


* 


* 


local SETC 





* 


* 


* The number of SET symbols permitted is variable, dependent upon available main storage. 






Note: The maximum size of a character expression is 127 characters for the DOS/TOS Assembler D and 
255 characters for the OS Assembler F. 





200 for Assembler F 
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APPENDIX J! SAMPLE MACRO DEFINITIONS 



The macro definitions in this appendix are 
typical applications of the macro language 
and conditional assembly. Another macro 
definition is included in the sample pro- 
gram as part of Appendix H. 



Notice the use of the inner macro in- 
struction (IHBERMAC) within SAVE for the 
purpose of generating MNOTE statements. 
Included with SAVE are some examples of the 
statements generated from it. 



MEMBER NAME SAVE 








MACRO 






00020000 


CNAME 


SAVE 


£,REG,r.CnOE,UD 




00 040000 




LCLA 


CA,£8,CC 




00060000 




LCLC 


CE,CF,CG,CH 




00080000 




AIF 


1'CREG' EC1 ").E1 




00100000 




AIF 


CtlD' EQ "l.NULLID 




00120000 




AIF 


(•tin* EQ •••>. SPECID 




00140000 


CA 


SETA 


( (K'CID+2)/2)*2+4 




00160000 


CNAME 


8 


GA.10,15) 


JRANCH AROUND ID 


00 180000 


CA 


SETA 


K'CIU 




00200000 




DC 


ALHCA) 


LENGTH OF IDENTIFIER 


00220000 


.CONTB 


AIF 


(CA ST 32). SPLITUP 




00240000 


.CONTAA 


AIF 


(CA GT 8). BRAKDWN 




00260000 


tE 


SETC 


•GID* UB+l.CA) 




00280000 




DC 


CLCA'CE' 


IDENTIFIER 


00300000 




AGO 


.CONTA 




00320000 


.BRAKDWN 


ANOP 






00 340000 


CE 


SETC 


•GID« (CB+1,8) 




00 360000 




DC 


CL8'£E' 


IDENTIFIER 


00380000 


CB 


SETA 


CB + 8 




00400000 


CA 


SETA 


CA-8 




00420000 




AGO 


.CONTAA 




00 440000 


.SPLITUP 


ANOP 






00460000 


CE 


SETC 


'CID' (Ctt+1,8) 




00480000 


CF 


SETC 


•CIO' UB + 9,8) 




00500000 


CG 


SETC 


•CIO' (CB+17,8) 




00520000 


EH 


SETC 


•CIO' (GB*25,8> 




00540000 




DC 


CL32'CE.CF.CG.CH« 


IDENTIFIER 


00560000 


tB 


SETA 


CB+32 




0C580000 


CA 


SETA 


CA-32 




00600000 




AGO 


.CONTB 




00620000 


• NULL ID 


ANOP 






00640000 


CNAME 


DS 


OH 




00660000 




AGO 


.CONTA 




00680000 


.SPECID 


AIF 


{•CNAME* EQ ••). CSECTN 




00700000 


tE 


SETC 


•CNAME' 




00720000 


CA 


SETA 


1 




00740000 


.CONTQ 


AIF 


(•C6« (l,CA) EQ 'CE'). LEAVE 




00760000 


CA 


SETA 


CA+1 




00780000 




AGO 


.CONTQ 




00800000 


.LEAVE 


ANOP 






00820COO 


CB 


SETA 


( (CA+2)/2)»2*4 




00840000 


CNAME 


B 


CB.<0,15) 


BRANCH AROUND ID 


00860000 




DC 


ALKCA) 




00880000 




DC 


CLCA'CE' 


IDENTIF IER 


00900000 




AGO 


.CONTA 




00920000 


.CSECTN 


AIF 


(•CSYSECT* EQ ").E4 




00940000 


CE 


SETC 


•CSYSECT' 




00 960000 


CA 


SETA 


1 




00980000 




AGO 


.CONTQ 




01000 000 


• E4 


IHBERMAC 78,360 


CSECT NAME NULL 


01020000 


.CONTA 


AIF 


(T'CREG(l) NE •N»).E3 




01040000 




AIF 


CCCODE' EQ 'T'). CONTC 




OlOoOOOO 




AIF 


PCCODE' NE ").E2 




01080000 


CA 


SETA 


CREG(1)»4*20 




01 100000 




AIF 


(CA LE 75). CONTD 




01120000 


CA 


SETA 


CA-64 




01140000 


.CONTD 


AIF 


(N'CREG NE 2). CONTE 




01160000 




STM 


CREG(1),CREG(2),£A.(13J 


SAVE REGISTERS 


01180000 




MEXIT 






01200000 


.CONTE 


AIF 


(N'CREG NE 1).E3 




01220000 




ST 


CREG(l) tCA.(13,0> 


SAVE REGISTER 


01240000 




MEXIT 






01260000 


.CONTC 


AIF 


(CREG(l) GE 14 OR CREG(l) LE 


2).CONTF 


01280000 




STM 


14,15.12(13) 


SAVE REGISTERS 


01300000 


CA 


SETA 


CREG(l)«4+20 




01320000 




AIF 


(N'CREG NE 2). CONTG 




01340000 




STM 


EREG(1),GREG(2),CA.<13) 


SAVE REGISTERS 


01360000 




MEXIT 






01380000 


.CONTG 


AIF 


(N'CREG NE 1).E3 




01400000 




ST 


CREG(l) »CA.(13,0) 


SAVE REGISTER 


01420000 




MEXIT 






01440G00 



Appendix J: Sample Macro Definitions 149 



.CONTF 


AIF IN«CREG NE 2). CONTH 




STM 14, &REG(2>, 12(13) 




MEXIT 


CONTH 


AIF (N'CREG NE 1).E3 




STM 14, CREG(l), 12(13) 




MEXIT 


El 


IHBERMAC 18,360 




MEXIT 


.62 


IHBERMAC 37,360,CC0DE 




MEXIT 


,E3 


IHBERMAC 36,360,£REG 




MEND 


END OF 


DATA FOR SOS OR MEMBER 



SAVE REGISTERS 

SAVE REGISTERS 
REG PARAM MISSING 
INVALID CODE SPECIFIED 
INVALID REGS. SPECIFIED 



01460000 
01480000 
01500000 
01520000 
0154 0000 
01560000 
01580000 
01600000 
01620000 
01640000 
01660000 
01680000 



SAMPLE SAVE MACRO INSTRUCTIONS 



FOGHORN SAVE 
FOGHORN OS 
STM 



114,12) 

OH 

14,12,12(131 SAVE REGISTERS 



SAVE (REG14,REG12),T 
OS OH 

12,»»« IHB002 INVALID FIRST OPERANO SPECIFIED-(REG14,R 



SAVMACRO SAVE 
SAVMACRO B 
DC 
DC 



I14,12),T,» 

14(0,15) BRANCH AROUND 10 

ALK8) 

CL8»SAVMACR0* IDENTIFIER 



STM 14,12,12(13) SAVE REGISTERS 



MEMBER NAME NOTE 
MACRO 



CNAME 



CNAME 



.ERR 



NOTE 6DCB 

AIF ('SUCH' EQ 

IHBINNRA CDCB 

L 15,B4(0,1) 

BALR 14,15 

MEXIT 

IHBERMAC 6 

MEND 



00020000 
00040000 
00060000 
00080000 
LOAD MOTE RTN ADDRESS 00100000 
LINK TO NOTE ROUTINE 00120000 
00140000 
00160000 
00180000 



MEMBER NAME POINT 

MACRO 
CNAME POINT £DCB,£LOC 

AIF CCDCB' EQ ••I.ERR1 

AIF CtLOC EO ">.ERR2 
CNAME IHBINNRA £DCB,£LOC 

L 15,84(0,1) 

BAL 14,4(15,0) 

MEXIT 
.ERR1 IHBERMAC 6 

MEXIT 
.ERR2 IHBERMAC 3 

MEND 



00020000 
00040000 
00060000 
00080000 
00100000 
LOAD POINT RTN ADDRESS 00120000 
LINK TO POINT ROUTINE 00140000 
00160000 
00180000 
00200000 
00220000 
00240000 



MEMBER NAME CHECK 

MACRO 
CNAME CHECK 6DECB 

AIF CeDECB' EO •• ).E1 
CNAME IHBINNRA CDECB 

L 14,8(0,1) 

L 15,52(0,14) 

BALR 14,15 

MEXIT 
•El IHBERMAC 07,018 

MEND 



PICK UP DCB ADDRESS 
LOAD CHECK ROUT. ACDR. 
LINK TO CHECK ROUTINE 



00020000 
00040000 
00060000 
00080000 
00100000 
00120000 
00140000 
00160000 
00180COO 
00200000 
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Indexes to systems reference library manuals are consolidated in the publication OS Master Index to Reference Manuals , Order No. GC28-6644. 
For additional information about any subject below, refer to other publications listed for the same subject in the Master Index. 



&SYS, restrictions on use 67,81,95 
&SYSECT (see current control section name) 
&SYSLIST (see macro instruction operand) 
&SYSNDX (see macro instruction index) 
7090/7094 Support Package Assembler 3,145 

Absolute expressions 17,29 
Absolute terms 10 
ACTR instruction 89 
Address constants 47-49 

A- type 47 

Complex relocatable expressions 47 

Literals not allowed 15 

Q-type 48 

S-type 48 

V-type 48 

Y-type 47 
Address specification 30 
Addressing 

Dummy sections 25 

Explicit 19 

External control sections 2 8 

Implied 19 

Relative 21 
AGO instruction 89 
AIF instruction 88 
Alignment, 1 boundary 

CNOP instruction for 56 

Machine instruction 29 
Ampersands in 

Character expressions 83 

Macro instruction operands 71 

MNOTE instruction 94 

Symbolic parameters 67 

Variable symbols 62,140 
ANOP instruction 90 
Apostrophes 

Character expressions 84 

Macro instruction operands 71 

MNOTE instruction 94 
Arithmetic expressions 

Arithmetic relations 86 

Evaluation procedure 82 

Invalid examples 82 

Operand sublists 72 

Operators allowed 81 

Parenthesized terms 
evaluation 82 
examples 82 

SETA instruction 81 

SETB instruction 86 

Substring notation 84 

Terms allowed 81 

Valid examples 81 
Arithmetic relations 86 
Arithmetic variable 9 8 
Assembler instructions 

Statement 35,133 

Table 131 
Assembler language 

Basic Programming Support 9,145 

Comparison chart 145 

Macro language, relation to 61 

Statement format 8,9 

Structure 10,11 



Assembler program 

Basic functions 4 

Output 22 
Assembly, terminating an 58 
Assembly no operation (see ANOP 

instruction) 
Attributes 

How referred to 77 

Inner macro instruction operands 76 

Notations 76 

Operand sublists 76 

Outer macro instruction operands 76 

Summary chart 139 

Symbols 76 

Types 76 

Use 76 

(see also specific attributes) 

Basic Programming Support Assembler 3,145 
Base registers 

Address calculation 4,28,30 

DROP instructions 20 

Loading 20 

USING instructions 19 

Begin column 8,53,54 
Binary constant 43 
Binary self-defining term 13 
Binary variable 9 8 
Blanks 

Logical expressions 86 

Macro instruction operands 71 
CCW instruction 50 
Channel command word, defining 51 
Character codes 107 
Character constant 42 
Character expressions 

Ampersands 84 

Apostrophes 84 

Character relations 86 

Examples 84 

Periods 84 

SETB instructions 86 

SETC instructions 83 
Character relations 86 
Character self-defining term 13 
Character set 15,107 
Character variable 9 8 
CNOP instruction 56 
Coding form 7 
Columns (begin, continue, end) 8,53,54 

COM instruction 27 

Commas, macro instruction operands 72 

Comment Entry 9 

Comment statements 

Example 69 

Model statements 69 

Not generated 69 
Comparison chart 145 
Compatibility 

Assembler language 3 

Macro definitions 104 
Complex relocatable expressions 47 
Concatenation 

Character expressions 83,85 

Defined 68 
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Examples 68 

Substring notations 85 
Conditional assembly elements, summary 

charts of 90,138 
Conditional assembly instructions 

How to write 75 

Summary 75 
Continue column 8,53/54 

Use 75 

(see also specific instructions) 
Conditional branch (see AIF instruction) 
Conditional branch instruction 32 

Operand format 33 
Constants (see also specific types) 

Defining (see DC instructions) 

Summary 135 
Continuation lines 7 
Control dictionary 22 

Control section location assignment 22 
Control sections 

Blank common 27 

CSECT instruction 23 

Defined 22 

First control section, properties of 23 

START instruction 23 

Unnamed 2 4 
COPY instruction 57 
COPY statements in macro definitions 

Format 70 

Model statements, contrasted 70 

Operand field 70 

Use 69 
Count attribute 

Defined 79 

Notation 79 

Operand sublists 79 

Use 78 

Variable symbols 79 
CSECT instruction 

Length attribute 23 

Symbols 23 
Current control section name (&SYSECT) 

Affected by CSECT, DSECT, START 99 

Example 100 

Use 99 
CXD instruction 26 

Data definition instructions 36 
Channel command words 50 
Constants 36 
Storage 48 
DC instruction 36 

Constant operand subfield 41 

Address constant (see Address 
constants) 

Binary constant 43 

Character constant 42 

Decimal constant 46 

Fixed-point constant 43 

Floating-point constant 44 

Hexadecimal constant 42 

Type codes for 38 
Exponent modifier 41 
Duplication factor operand subfield 38 



Length modifier 39 

Bit length specification 39 

Modifiers operand subfield 38 

Scale modifier 40 

Type operand subfield 38 
Decimal constants 46 

Length, maximum 46 

Length modifier 39 

Packed 46 

Zoned 46 
Decimal field, integer attribute of 80 
Decimal self-defining terms 12 
Defining constants (see DC instruction) 
Defining storage (see DC instruction, 

DS instruction) 
Defining symbols 12 

Dimension, subscripted SET symbols 97 
Displacements 29 
Double-shift instruction 29 
DROP instruction 20,29 
DS instruction 4 8-50 

Defining areas 50 

Forcing alignment 50 
DSECT instruction 24 

Dummy section location assignment 25 
Duplication factor 38 

Forcing alignment 50 
DXD instruction 26 

Effective address, length 30 

EJECT instruction 52 

End column 8,53,54 

END instruction 58,66 

ENTRY instruction 27,28 

Entry point symbol, identification of 28 

EQU instruction 35 

Equal signs, as macro instruction operands 

71 
Error message (see MNOTE instruction) 
Error messages after END statement 58 
Explicit addressing 19,30 

Length 30 
Exponent modifiers 41 
Expressions 16 

Absolute 17 

Evaluation 16 

Relocatable 17 

Summary chart 138 
Extended mnemonic codes 32 

Operand format 33 
External control section, addressing of 28.1 
External dummy sections 26 
External symbol, identification 28 
EXTRN instruction 27,28 

First control section 23 
Fixed-point constants 44 

Format 43 

Positioning 44 

Scaling 44 

Values, minimum and maximum 44 
Fixed-point field, integer attribute of 78 
Floating-point constant 44 

Alignment 45 
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Format 45 

Scale modifiers 45 
Floating-point field, integer attribute 

of 78 
Format control, input 53 

GBLA instruction 95 
GBLB instruction 95 
GBLC instruction 95 
General register zero, base register 

usage 20 
Generated statements, examples of 6 8 
Global SET symbols 63 

Defining 95 

Examples 96,97 

Local SET symbols, compared 9 4 

Use 94 
Global variable symbols 

Types 94 

(see also global SET symbols, 

subscripted SET symbols) 

Hexadecimal constants 42 
Hexadecimal-decimal conversion chart 

113-117 
Hexadecimal self-defining terms 13 

I' (see integer attribute) 
ICTL instruction 53,66 
Identification-sequence field 9 
Identifying assembly output 51 
Identifying blank common control section 

26 
Identifying dummy section 24 
Implied addressing 30 

Length 31 
Implied length specification 31 
Inner macro instruction 

Defined 73 

Examples 74 

Symbolic parameters 73 
Instruction alignment 29 
Integer attribute 

Decimal fields 78,80 

Defined 78,79 

Examples 79,80 

Fixed-point fields 7 8,79 

Floating-point fields 78,80 

How to compute 79 

Restrictions on use 78 

Symbols 78 
ISEQ instruction 54,66 

K' (see count attribute) 

Keyword 

Defined 100 

Keyword macro definitions 101 
Keyword macro instruction 101 
Symbolic parameter and 101 

Keyword, inner macro instructions used in 
102 

Keyword macro definition 

Positional macro definitions, compared 
101 



Use 101 
Keyword macro instruction 

Example 101 

Format 101 

Operand sublists 102 

Operands 

Invalid examples 101 
Valid examples 102 
Keyword prototype statement 

Example 101 

Format 101 

Operands 

Invalid examples 101 
Valid examples 101 

Standard values 101 



L' (see length attribute) 
LCLA instruction 81 
LCLB instruction 81 
LCLC instruction 81 
Length attribute 

Defined 15,78 

Examples 78 

Restrictions on use 76 

Symbols 15,79 
Length modifier 39 

Bit-length specification 39 

Length subfield 29 
Lengths, explicit and implied 30 
Library, copying coding from 57 
Linkage symbols (see also ENTRY 

instruction, EXTERNAL instruction) 

Entry point symbol 28 

External symbol 28 

Linkage editor, and use of 27-28.1 
Listing, spacing 52 
Listing control instructions 51 
Literal pools 14,55 
Literals 14 

Character 15 

DC instruction, used in 15 

Definitions 37 

Duplicate 56 

Format 15 

Literal pool, beginning (LTQRG) 55 

Literal pools, multiple 15 
Local SET symbols 

Defining 95 

Examples 95-97 

Global SET symbols, compared 94 
Local variable symbols 

Types 94 

(see also local SET symbols and 
subscripted SET symbols) 
Location counter 

CSECT 22 

Definition 14 

DSECT 24 

How to set 
ORG 55 
START 2 3 

Use in address constants 42,47 
Logical expressions 
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AIF instructions 88 

Arithmetic relations 86 

Blanks 86 

Character relations 86 

Evaluation 87 

Invalid Examples 87 

Logical operators 86 

Parenthesized terms 
Evaluation 87 
Examples 87 

Relation operators 86 

SETB instructions 86 

Terms allowed 86 

Valid examples 87 
LTORG instruction 55 
Machine-instruction examples and format 

RR 29,31 

RS 29,32 

RX 29,32 

S 29,32 

SI 29,32 

SS 29,32 

Summary table 119 
Machine-instruction mnemonic codes 31 

Alphabetical listing 122 

By duration code 129 
Machine instructions 29 

Alignment and checking 29 

Literals, limits on 14 

Mnemonic operation codes 31 

Operand fields and subfields 29 

Symbolic operands 31 
MACRO 

Format 6 5 

Use 65 
Macro library defined 61 
Macro definition 

Compatibility 104 

Defined 61 

Error flagging 58 

Example 67 

Header 65 

How to prepare 65 

Keyword (see Keyword macro definition) 

Mixed-mode (see Mixed-mode 
macro definition) 

Placement in source program 65 

Trailer 65 

Use 61 
Macro definition exit (see MEXIT 

instruction) 
Macro definition header statement (see 

MACRO) 
Macro definition trailer statement (see 

MEND) 
Macro instruction 

Defined 61 

Example 67 

Format 71 

How to write 71 

Levels 74 

Mnemonic operation code 71 

Name field 71 

Omitted operands 72 
Examples 72 



Operand field 71 
Operand sublists 72 
Operands 

Ampersands 72 
Apostrophes 71 
Blanks 72 
Commas 7 2 
Equal signs 71 
Parentheses 71 
Operation field 71 
Statement format 72 
Types 61 
Macro instruction index (&SYSNDX) 
Examples 99 
Use 98 
Macro instruction operand (&SYSLIST) 
Attributes 100 
Use 100 
(see also symbolic parameters) 
Macro instruction prototype statement (see 

prototype statement) 
Macro instruction statement (see macro 

instruction) 
Macro language 

Comparison chart 147 

Extended features 93 

Relation to assembler language 61 

Summary 91,137-140 

MEND 

Format 65 

MEXIT instruction, contrasted 93 

Use 65 
MEXIT instruction 

Example 93 

Format 93 

MEND, contrasted 93 
Mixed-mode macro definitions 

Positional macro definitions, 
contrasted 103 

Use 103 
Mixed-mode macro instruction 103 
Mixed-mode prototype statement 103 
Mnemonic operation codes 29,31 

Extended 32 

Machine instruction 31 

Macro instruction 65 
MNOTE instruction 

Ampersands 94 

Apostrophes 9 4 

Error message 94 

Examples 94 

Format 93 

Severity code 9 4 
Model statements 

Comments field 67 

Defined 66 

Name field 66 

Operand field 67 

Operation field 66 



N 1 (see Number attribute) 
Name entry 8 
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Number attribute 
Defined 79 
Examples 79 

Operand sublist 

Alternate statement format 72 

Defined 72 

Examples 73 
Operands 

Entries 8 

Fields 29 

Subfields 29,30 

Symbolic 27,29,30 
Operating system 5 
Operation field 29 
OPSYN instruction 35,36,66 
ORG instruction 55 
Outer macro instruction defined 73 

Paired apostrophes 71 
Paired parentheses 71 
Parentheses 

Arithmetic expressions 82 

Logical expressions 87 

Macro instruction operands 71 

Operand fields and subfields 29 

Paired 71 
Period 

Character expressions 84 

Comments statements 69 

Concatenation 6 8 

Sequence symbols 80 
Positional macro definition (see macro 

definition) 
Positional macro instruction (see macro 

definition and macro instruction) 
Previously defined symbols 12 
PRINT instruction 52,66 
Program control instructions 53 
Program listings 5 
Program sectioning and linking 22 
Prototype statement 

Examples 66 

Format 65 

Keyword (see keyword prototype 
statement) 

Mixed-mode (see mixed-mode prototype 
statement) 

Name field 6 5 

Operand field 65 

Operation field 65 

Statement format 

Alternate 66 
Normal 66 

Symbolic parameters 65 
Pseudo Register (see DXD instruction) 
PUNCH instruction 54 

Quotation marks (see Apostrophes) 
Quoted string 71 

Relational operators 86 
Relative addressing 21 
Relocatability 4,10,11 

Attributes 17 

Program, general register zero 20 
Relocatable expressions 17,29 

In USING instructions 20 



Relocatable terms 10,11 

Pairing of 17 

In relocatable expressions 17 
REPRO instruction 55 
RR machine instruction 

Format 31,119 

Length attribute 29 
RS machine instruction 

Address specification 30 

Format 32,119 

Length attribute 29 
RX machine instruction 

Address specification 30 

Format 32,119 

Length attribute 29 

S machine instruction 

format 29,32,120 
S' (see scaling attribute) 
Sample program 141 
Scale modifier 

Fixed-point constants 43 

Floating-point constants 45 
Scaling attribute 

Decimal fields 78 

Defined 78 

Examples 78 

Fixed-point fields 78 

Floating-point fields 78 

Restrictions on use 78 

Symbols 78 
Self-defining terms 12 

(see also specific terms) 
Sequence checking 54 
Sequence symbols 

AGO instruction 89 

AIF instruction 8 8 

ANOP instruction 90 

How to write 80 

Invalid examples 80 

Macro instruction 80 

Valid examples 80 
Set symbols 

Assigning values 75 

Defining 75 

Symbolic parameters, contrasted 75 

Use 75 

(see also local SET symbols, global SET 
symbols, and subscripted SET symbols) 
SET variable 94 
SETA instruction 

Examples 81-83 

Format 81 

Operand field 

Evaluation procedure 81,82 
Operators allowed 81 
Parenthesized terms 82 
Terms allowed 81 
Valid examples 82 

Operand sublist 82 
Examples 82 
SETA symbol 

Arithmetic relations 82 

Assigning values to 82 

Defining 75,82 

Use 82 
SETB instruction 

Examples 86 
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Format 86 

Logical expressions 86 

Arithmetic relations 86 
Blanks 87 

Character relations 86 
Evaluation 87 
Operators allowed 86 
Terms allowed 86 
Operand field 84 

Invalid examples 87 
Valid examples 87 
SETB symbol 

AIF instruction 87 
Assigning values 75 
Defining 75 

SETA instructions, use in 87 
SETB instructions, use in 87 
SETC instructions, use in 87 
SETC instruction 

Character expressions 83 
Ampersands 84 
Apostrophes 83,84 
Periods 84 
Concatenation 

Character expressions 84 
Substring notation 84 
Examples 83,85 
Format 83 
Operand field 83 
Substring notations 

Arithmetic expressions 84 
Character expressions 84 
Invalid examples 85 
Valid examples 85 
Type attribute 83 
Examples 83 
SETC symbol 

Assigning values 85 
Defining 75,85 
SETA instruction, use in 86 
Severity code in MNOTE instruction 93,94 
SI machine instruction 

Address specification 30 
Format 32,119 
Length attribute 29 
SPACE instruction 51 
SS machine instruction 

Address specification 30 
Format 32,119 
Length attribute 29 
Length field 30 
Standard value 

Attributes 102 

Keyword prototype statement 101 
START instruction 
Positioning 23 
Unnamed control sections 24 
Statements 8,9 
Boundaries 8 
Examples 9 
Macro instruction 71 
Prototype 65 
Storage, defining (see DS instruction) 
Sublist (see Operand sublist) 
Subscripted SET symbols 
Defining 97,98 

Examples 97 
Dimension 98 



Invalid examples 97 

Subscript 95 

Use 9 8 

Examples 98 

Valid examples 97 
Substring notation 

Arithmetic expressions 84 

Character expression 84 

Invalid example 85 

SETB instruction 86 

SETC instruction 85 

Valid examples 85 
Symbol definition, EQU instruction for 12 
Symbolic linkages 27 
Symbolic operand formats 31 
Symbolic parameters 

Assigning values 67 

Comments field 66 

Concatenation 68 

Defined 67 

Examples, invalid and valid 68 

Prototype statement 65 

(see also variable symbols) 
Symbols 

Defining 12 

Length attributes 15,29 

Length, maximum 12 

Previously defined 12 

Restrictions 12 

Value attributes 29 
System macro instructions defined 62 
System variable symbols 

Assigned values by assembler 98 

Defined 9 8 

(see also specific system variable 

symbols) 

T' (see type attribute) 
Terms 

Expressions composed of 10 

In parentheses 16 

Pairing of 16 
TITLE instruction 51 
Type attribute 

Defined 77 

Literals 77 

Macro instruction operands 77 

SETB instruction 86 

SETC instruction 83 

Symbols 77 

Unconditional branch (see AGO instruction) 
Unnamed control section 24 
USING instruction 19 

Variable symbols 

Assigning values 63 

Defined 62 

Summary chart 140 

Types 62 

Use 62 

(see also specific variable symbols) 
y-type address constant 48 
WXTRN instruction 28.1,48 
XFR instruction 3 

Y-type address constant 47 
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